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Présentation 


des disquettes 
ToolBox Mag 


9 OJeUUNN 


Bon xogloo! Numéro 6 


Eh oui, on prend ses aises: deux disquettes désormais dans 
chaque numéro de ToolBox-Mag! Et pour le même prix! On va 
enfin pouvoir faire confortablement de l'hypermédia... Voici 
les catalogues: 

Disquette 6A : 


/ANIM.TBMAG6: la présentation de ce numéro 6. Les gra- 
phismes sont d'Olivier Bailly-Maître, la musique de Sébastien 
Mousseron, l'animation d'Olivier Goguel. Bootez la disquette! 
/ANNONCES: il faut tout lire dans ToolBox-Mag, y compris les 
petites annonces. 

/BABAR: la suite (partie Midi) de l'étude de Jean-Pierre Char- 
pentier sur l'outil SynthLab et le “5” de GS. Branchez le DX7 et 
la boîte à rythmes sur le GS, et chauffe Marcel! Attention, pour 
que ça marche, mettez le Tool.Setup de la disquette à la place 
du vôtre (bug du 5.04 français). Voyez pages 36-38. 
/DERNIERE.HEURE: lisez le fichier Lisez.Moi. 

IMINIDESKTOP: les sources et l'application qui servent de sup- 
port aux cours d'initiation à la programmation du GS du Pro- 
fesseur Destelle. Voyez pages 39 à 50. Rappel: les fichiers se ter- 
minant par -rsrc sont des sources pour ResDoctor (disquette 
B). 

ISTARTTOOLS.C: c'est Philippe Manet qui remplace F. Uhrich 
pour notre rubrique sur le C de ce numéro 6, avec une version 
en C de la routine de Startup des outils pour les accessoires de 
Patrick Desnoues. Voyez pages 10-11. 

1SYS.5.04.US: le fichier du système 5.04 US nécessaire pour faire 
tourner MuSeq de J.P. Charpentier. Ce n'est pas notre faute, 
mais nos excuses quand même. 


/TEMPS.TRAVAIL: le “programme à écrire soi-même” de Pa- 


trick Desnoues. Voyez pages 21-23. 

IVISIT.MONITOR: init et source Merlin de “Visit Monitor II: 
the Revenge”, d'Olivier Goguel. Voyez pages 4 à 8. 

PRODOS est toujours un faux: voyez l'explication page 30. 


Disquette 68 : 


/PAROLE.PILES: deux piles HyperCard couleur pour faire par- 
ler le GS. Voyez l'article de Jacques Liautard pages 12-17. 
IRESDOCTOR: un éditeur de ressources complet pour le prix 
d'un numéro de ToolBox-Mag! Avec toute sa documentation 
sous formes de fichiers texte. Grâce à Jean Destelle (voir pages 
26-27). Adieu sans regrets à Rez et DeRez... 
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L'Editorial du Directeur : 


Prenons nos aises 


Deux revues et trois disquettes d'un coup dans la même en- 
veloppe, cette livraison va vous donner de l'occupation pour 
toutes vos vacances! Mais soyons francs: si vous avez reçu dès 
Juin le numéro d'Août/Septembre, c'est que nous avons be- 
soin d'un peu de temps; pour souffler un peu et pour bronzer, 
certes, mais surtout pour faire des projets. 


En effet, ToolBox-Mag arrive à un tournant important: le 
numéro 6, c'est le terme de la première série, le moment où la 
plupart d'entre vous ont à se réabonner. C'est le moment où 
on fait le point, où on trace des perspectives. 


D'ores et déjà, vous pouvez constater quelques changements: 


+ Le principal: nous mettons un terme aux revendications du 
Rédac'Chef. ToolBox-Mag, à partir du numéro 6, prend ses 
aises, et comporte désormais deux disquettes au lieu d'une! 

+ Nous pourrons ainsi nous orienter franchement vers l'hy- 
permédia (HyperStudio, et surtout HyperCard Couleur). 

+ L'initiation à l'Apple II GS prend de l'ampleur: nous en 
arrivons à l'initiation à la programmation du GS. 

° Au plan financier, nous maintenons notre choix: la qualité 
du contenu avant tout, intégralement financée par les abon- 
nements. Rien n'étant gratuit en ce bas monde (sauf la 
deuxième disquette du numéro 6!), le passage de six dis- 
quettes à douze se traduit donc par une augmentation (rai- 
sonnable) du tarif de l'abonnement, à compter du numéro 7. 


ToolBox-Mag est-il cher? 

Prenez votre collection des six premiers numéros: en se bor- 
nant aux programmes qu'ils contiennent, s'il s'était agi de lo- 
giciels commerciaux, ou même de shareware, combien au- 
riez-vous payé pour avoir tout cela? 


D'autant que nous avons une surprise pour vous: le réabon- 
nement à l'ancien tarif s'il nous parvient avant le 14 Juillet, 
soit six disquettes ToolBox-Mag gratuites! (Pour ne rien 
vous cacher: Septembre, c'est le “gros coup” de l'Apple-Expo. 
Nous aimerions bien avoir liquidé la gestion des réabonne- 
ments avant les vacances d'Août: d'où ce butoir absolu du 14 
Juillet). 


Grâce à vous, ToolBox-Mag a gagné son premier pari: exister, 
et les utilisateurs de GS ont désormais leur magazine en 
français. À vous de lui faire gagner son second pari: prendre 
ses aises et son confort, s'étaler un peu, s'installer en somme. 


S'étaler, s'installer, n'y aurait-il pas dans cette volonté, pour 
un magazine GS, un peu d'insolence? Ma foi, pas plus que 
dans notre devise commune: Apple II fort et vert ! 


ERIC WEYLAND 


PS: Pensez à lire les petites annonces de la disquette. 
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Visit Monitor Il 


Olivier Goguel 
© 1991 FTA & ToolBox Mag 


























Dans l'architecture du GS, l'un des éléments que les vrais program- 
meurs apprécient le plus est l'accessoire de bureau Visit Monitor, qui 
leur permet à tout moment (ou presque) d'aller explorer et/ou modi- 
fier la mémoire de l'ordinateur comme bon leur semble. Ce qui est 
très pratique pour mettre au point un programme, puisque l'on peut, 
par exemple, patcher certaines routines ou changer directement cer- 
taines variables sans avoir besoin de réassembler (Les vrais program- 
meurs ne compilent pas; ils assemblent !). 

Malheureusement, ce que ne donne pas Visit Monitor (et tous les 
clones qui ont été écrits jusqu'à présent: Nifty List, Diversi-Hack...), 
c'est le compteur ordinal (PC=Program Counter), c'est-à-dire 
l'adresse où le programme a été interrompu par l'activation du 
Control-Panel. Connaître le PC est une aide importante pour les vrais 
programmeurs, qui peuvent suivre plus facilement l'exécution des 
programmes; et c'est ce que l'on se propose de connaître à travers le 
programme Visit Monitor IT". 





Mise en œuvre de Visit Monitor IIT* 


Elle est des plus aisées.. Il suffit de copier le fi- 
chier VMonitor.Il (de type PIF=$B6) dans le 
sous-catalogue  /System/System.Setup de votre 


disque système. 


ment la zone pointée par le PC avec les bons 
modes de désassemblage. 


Principaux problèmes liés 
à la programmation de Visit Monitor IT“ 


Tout d'abord, on a besoin de connaître le PC, 


Lors du boot, une icône apparaît en bas à 
gauche pour vous indiquer que Visit 
Monitor II“ est actif. Ensuite, lors de votre pro- 
chain accès au Control-Panel,Visit Monitor IITM 
est installé et utilisable à la place de Visit Moni- 
tor (qui n'apparaît plus dans la liste des CDA). 














Si vous choisissez Visit Monitor IT", vous arri- 
vez dans le moniteur (Ctrl-Y ou Q pour ressor- 
tir) et les registres PC, B, D, m, x et e sont affi- 
chés. Les autres registres sont accessibles par la 
commande moniteur Ctrl-E. 

De plus, les pointeurs du moniteur sont auto- 
matiquement positionnés sur le PC: de ce fait, si 
on tape L par exemple, on désassemble directe- 
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c'est notre but originel. 

Le PC se trouve, au moment du processus d'in- 
terruption, empilé ainsi que le registre d'état (P). 
Ensuite, le gestionnaire d'interruption (Interrupt 
Manager, qui est susceptible de varier selon les 
Roms) est exécuté: il va lancer la routine corres- 
pondant à la nature de l'interruption. 

Ces deux niveaux de routines vont, à leur tour, 
ajouter des informations sur la pile, et on risque 
d'avoir des difficultés par la suite à retrouver 
l'adresse exacte du PC. 

Afin d'être sûr de ne pas la perdre, on va direc- 
tement réécrire le début de l'Interrupt Mana- 
ger, pour sauvegarder tout de suite le PC D 
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et les autres registres qui nous intéressent. 


Autre problème, puisque Visit Monitor et Visit 
Monitor [M ont exactement la même utilité (à 
part bien sûr l'affichage du PC), il est inutile 
d'encombrer la liste des accessoires de bureau 
actifs par ces deux CDA; on va donc remplacer 
Visit Monitor par Visit Monitor II, 


Ces deux problèmes vont engendrer la transfor- 
mation de notre fichier VMonitor.Il, que l'on 
pensait au début générer en tant que CDA, en 
fichier PIF, c'est-à-dire Permanent Initialisation 
File. En effet, on va avoir besoin, avant de pou- 
voir exécuter Visit Monitor II, d'installer notre 
nouvel Interrupt Manager ainsi que de rempla- 
cer Visit Monitor par Visit Monitor LIT", 


En ce qui concerne la création d'un fichier de 
type PIF, cela ne pose absolument aucun pro- 
blème (du moins en assembleur, si j'ai bien com- 
pris ToolBox-Mag 4...); un init PIF est un fichier 
GS/O5, qui est exécuté dès son chargement par 
le système. Voyez ToolBox-Mag 4 sur les inits 
(PIF et TIF). 

On inclura donc dans une première partie de ce 
fichier les routines permettant d'installer le nou- 
vel Interrupt Manager et de remplacer Visit Mo- 
nitor par Visit Monitor II. 

Ensuite, dans une deuxième partie, on inclura le 
nouvel Interrupt Manager ainsi que le CDA Vi- 
sit Monitor II. 


Dernier problème, purement décoratif : afficher 
une icône lors de l'installation de l'init. Il 
n'existe aucune fonction permettant de faire cela 
automatiquement. Seul le Resource Manager le 
permettrait, mais je ne suis pas (au contraire de | 
mon néanmoins ami Bernard) un fan des res- ! 
sources; on va, comme d'habitude, se dé-! 
brouiller tout seul. 

On va simplement afficher une icône directe- 
ment sur l'écran du GS à un emplacement défi- 
ni. Cet emplacement pourra être très facilement mo- 
difié dans le source s'il correspond déjà à une icône 
de votre système. 

Pour simplifier la routine d'affichage et la place 
de l'init, j'affiche une icône parfaitement rectan- 
gulaire, ce qui ne m'oblige pas à gérer un éven- 
tuel masque d'affichage. 

Bibliographie: voyez le “GS Epluché” si les mots 


“PC”, “registres”, etc, ne sont pas clairs pour 
vous. 
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Visit Monitor II v1.01 


{c) FTA & ToolBox-Mag, Mars 1991 
Assemblage par OA-6 sous Merlin16+ 


REL 
TYP SB6 Fichier PIF 
DSK VMONITOR.ILL 
QAdr = S0003D0 
UsrAdr = S0003F8 Vecteurs de retour 
Roufine d'inifialisation 
Start PHP 
SEI 
REP S30 
PHB 
PHK 
PLB 
TSC Rend disponibles 
SEC les $10 premières 
SBC #$10 valeurs de la page Zero 
TCS 
PHD 
INC 
TCD 
JSR  InstallVMIT nsfalle VMonitor I 
BCS Not 
JSR DrawWindowAffiche l'icône de l'init 
LDX #2 
Jp LDAL $E10010,X Remplace l'Interrupt 
STA vector rom,XManager 
LDA NewVect.X 
STAL $E10010,X 
DEX 
DEX 
BPL Jp 
Not PLD Retour propre 
TSC au programme appelant 
ELLE 
ADC#$10 
TCS 
PLB 
PLP 
RTL 


Nouvelle routine d'interrupt manager... 
int_manager CLC 
X 


CE 

PHP 

REP #$30 

SEI 

PHA 

PHB 

PHK 

PLB 

LDAL $E1C068 

PHA 

AND #$FEFCF Elimine une éventuelle 

STAL $E1C068 autorisation de lecture en 
bankI, sinon, on dira 
$E11D66 au lieu de SE01D66 

Regarde si on est déjà dans le control-panel 

LDAL $E01D66  CPanel 

CMP #$FF09 C=0 

PLA 

STAL SEICO68 Si Qui, les nouvelles 
valeurs des registres 


BCC NoSaveAdr ne nous intéressent pas 


Sinon, on va sauvegarder Les registres qui nous semblent 
utiles. À ce niveau-là, la pile se présente comme suit : 


“6 PC (Adr) Ermpilé automatiquement par 
br P (Byte) le mécanisme d'interrupt manager 
Le A (Word) Empilé par nofre interrupt manager 
Lx B (Byte) idem 

SP -> 


D 
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LDAL SE1CO68 On regarde si l'on a trouvé Le CDA "Visit Monitor" 


STA Sw68 
LDA [$04] On regarde si la 
ra CMP #$D60D longueur du nom = $D 
BNE NotFound ef si la premiere lettre = "V" 
LDA 502,5 
STA AAdr Si oui, on va tester Les autres lettres en utilisant la chaîne 
STY YAdr "Visit Monitor" incluse dans "Visit Monitor Il" pour 
STX XAdr effectuer la recherche... 
nn lp LDA (S04]y 
CMP SearchString.Y 
STA ZPageAdr BNE NotFound 
LDA 506,5 INY 
STA PCAür INY 
DA $04S CPY #14 
BIT  #5%0000_0000_0000_0001 BNE Jp 
BEQ NoForce_xm 
ORA #550011_0000_0000_0000 On a enfin trouvé le CDA visit Monitor. On va l'éliminer de 
NoForce_xm STA PAdr la liste des CDA en remplacant son handle par un handle 
AND #5%0000_0000_0000_0001 sur notre CDA : Visit Monitor II 
BEQ E0 LDY #2 
LDAL SE1C068 Mode Emulation LDA Æ#VisitMonitorll 
BIT #$0010 STA [$00 
LC Force C=0 LDA #AVisitMonitorll 
FHP STA  [$00].Y 
LDA $08,S CLC 
ne #SOO0FF On est soit en bank0 RTS Installation terminée 
BEQ PCI Le CDA trouvé ne s'appelait pas Visit Monitor, 
ORÀA #$0100 soit en bankl si on travaille on va tester le suivant... 
BRA PCI dans la mem aux (bité C068) NoFoundINC  $08 
E0 LDA 507,5 Mode Natif A 508 , 
SEC C=] CMPL $E01 D7C Nb de CDA Acfifs 
PCI STA PCAdr+1 BCC Again 
TSC Aucun CDA ne s'appelle Visit Monitor, ce qui est en théorie 
ADC #7 Ajoute 7 ou 8 impensable, (à moins que VM II ne soit déjà installé...). 
STA SiackAdr suivant que l'on est ; 
en mode emulation ou non SEC (optionnel) 
NoSaveAdr PLB RTS Sortie avec erreur 
PLA Again  LDA $00 Passage au handle 
PLP CIE suivant... 
XCE ADC #4 
vector_rom JML $000000 ét saute au manager STA $00 
initial en rom BRA SearchNext 


n y 
NewVect IML int manager Nouveau vecteur CDA Visit Monitor II : The Revenge (!) 


de l'interrapé manager largement inspiré du source du CDA Visit Monitor d'Apple... 
MX 00 VisitMonitorll ADRL#+4  Ptrsur le CDA 
Installation de VMonitor II SearchString STR "Visit Monitor Il" Nom du CDA 
ADRE LaunchMonitor Adresse d'entrée 
Install VMII LDY #0 : : 
JSR FEB4 FAR TRS Men ADRL QuitMonitor pornos a 
au cas où il serait absent | proënte sur He RTE. 
Maintenant, on va fracer tous les CDA jusqu'à rire; SEP $30 
ce que l'on trouve Visit Monitor PEA  $0000 
LDAL $E01D84  Handle sur les handles PLB B=0 
STA  $00 des CDA PLB 
ren Puis LDX #2 Sauvegarde dans la 
lp LDA UsrAdrX l'ancienne adresse du 
LDY #2 on le déréference PHA vecteur ctri-y et de 
DE [$00] LDA QAd,X du vecteur "Q" 
PHA 
LDA [S$00],Y LDAL NewUsr,X 
STA S$02 | STA UsrAd,X Met l'adresse de 
STX S$00 STA QAdrX retour au CDA... 
STZ $08 Compteur de CDA 1 
SearchNext LDY #2 On prend le handle sk 
LDA [S0o] du CDA référencé LDA #0 
STA $04 LDX #<SFF69 | 
LDA [$00],Y ROL S$C025 Si on appuie sur G, 
STA S$06 BCS AppleVM on a exactement 
LDA #"M'&S9F Le Visit Monitor d'Apple 
Me [S04) On le déréference LDX #<SFF69+3 (ou presque...) 
V 
LD À ou , Apple BE PatchText 
t on tombe directement STAL Patch]mp+1 
STX $04 sur le nom du CDA rang D 
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LDX #8 PHX 
lp LDA S$F7,X Sauvegarde et remplace PHY 
PHA la zone $F7 à _ par LDA S$0D,S 
LDAL MoveRout,X les points d'entré PHA 
STA SF7,X et de sortie de VM II LDX #52403 _FW Entry 
DEX JSL  SE10000 
BPL Jp PLY 
REP $30 ne 
JSR  FCS58 Efface l'écran PLP 
LDY #0 Affichage du texte PLP 
TYX et des différents RTS 
Jp LDALTextILX registres concernés Text ASC “Visit Monitor II by FTA.",8D 
AND #S$00FF PatchText HEX 8D 
BEQ EndText ASC "PC=B= D= m= x= e=",00 
nn ie Affichage des différents registres... 
BNE NoPrintValue SpecialRout DA PrintPC 
PHX DA  PrintB 
TYX DA  PrintD 
JSR  (SpecialRout,X) DA  Printm 
INY DA  Printx 
INY DA  Printe 
SN te PrintPC LDX #2 
TRE TRS lp LDAL PCAdr,X 
BRA Ip JSR FDDA 
EndText SEP S30 DEX 
SEC Exécution du moniteur = lp 
XCE oveParms Envoie les registres 
JML  $0000F7 aux variables du moniteur. 
PrintD  LDAL ons 1 
Retour après CTRL-Y ISR FDDA 
RetourAdr PLA On remet la Pile LDAL ZPageAdr 
PLA à un niveau honorable JMP FDDA 
PEA $0000 PrintB LDAL BAdr 
PLB JMP FDDA 
PLB Printm  LDAL PAdr+1 
CE BIT #%0010_ 0000 
XCE TestB BNE Of 
CLI On LDA #"0" 
LDX #$00 JMP FDED 
Joop  PLA Off LDA #1" 
STA SF7,X On remet les adresses JMP FDED 
Jp INX que l'on avait patchées Printx LDAL PAdr+1 
CPX #$09 BIT  #%0001_0000 
BCC Jloop BRA TestB 
PLA Printe  LDAL PAdr 
STA QaAdr-9,X BIT  #%0000_ 0001 
PLA BRA TestB 
. Per X Zone de stockage des registres 
BCC lp AAdr DS0,2 
REP $ XAdr DS 2 
QuitMonitor RTL Retour à l'appelant, YAdr DS 2 
càd Le gestionnaire de CDA StackAdr DS 2 
NewUsr JMP $00FB Nouveau vecteur pour Ctrl-Y Se : 
Routines déplacées en $00F7 pour faire Le lien BAR DS 
entre Le CDA et Le moniteur PCAdr DS 4 
MoveRout CLI sw DS 2 
Patchlmp JMP SFF69+3 +3 pour éviter l'initialisation | SW35 DS 2 
des variables registres du Envoie les registres aux variables registres du moniteur 
SEI moniteur MoveParms P HB 
JML RetourAdr rs SELEI 
Routines permettant d'appeler des fonctions standard du PLB 
moniteur depuis n'importe quel banc LDX #8 
FEB4 PEA SFEB4 Jp LDAL AAdr,X 
BRA Emulation STA S$0120,X 
FDED PEA SFDED DEX 
FCS58 PE SRCSE BPL Jp 
À 8 
BRA Emulation LDAL PCAdr 
FDDA PEA $FDDA SH no. 
Emulation PHA Jp STA S3A.X 
PHA DEX 
PHA DEX 
PHA BPL Jip 
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SEP. 520 

LDAL PCAdr+2 

STA S012C =K 
STA $013E 

STA $01A7 

LDAL BAüdr 

STA 5012B =B 
LDAL PAdr+1 

STA $012A =P 
LDX #0 


BIT #%0010_0000 
BEQ *+3 


STA 50130 =m 
#0 


BIT  #%0001_0000 
*+3 


STA $0131 =x 
LDAL PAdr 

AND #%:0000_0001 
STA $0132 se 
LDAL Sw68 

STA 5$012D =M 
AND #4 
LSR 

LSR 

STA 5$012F 
LDAL Sw35+1 
ASL 


Il 
| q 


Affichage de l'icône. 
DrawWindow LDAL $E1C029 
À #$40 


OR 
STAL $E1C029 
#0 


lp2 $20 
#IconNbCol 
Jp PHA 


LDA WindowAdr,YŸ 
NU $E12000+]JconPos,X 


QE 


BNE Jp 
REP 5$20 


ADC #$A0-IconNbCol 


CPX #IconNbLgn*SAO 
BCC Jip2 


169*$A0+5 
IconNbLgn= 50018 
IconNbCol=  SO011 


WindowAdr HEX … 
{voir les data de l'icône dans le fichier source sur le disque] 
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Accessoires et ressources 


Philippe Manet 


Quelques remarques à propos de l'article 
de Bernard Fournier sur les ressources 
dans ToolBox-Mag 4. La méthode propo- 
sée pour réouvrir en lecture-écriture le 
Resource Fork de l'application me paraît 
plus compliquée que nécessaire, et ne 
fonctionnant pas dans certains cas: 


+ La routine de GS/OS GetName ne ren- 
voie que le nom du fichier sans aucun 
préfixe. Si le préfixe courant ne corres- 
pond pas à celui du programme appelant 
(par exemple si on est dans un NDA), la 
réouverture du Resource Fork ne trouvera 
pas le fichier. Il faut utiliser à la place 
l'une des routines du System Loader: 
LGetPathname (qui renvoie une PString) 
ou LGetPathname2 (qui renvoie une 
Class1 String). C'est d'ailleurs la technique 
recommandée par le Bureau Politique” 
dans la note technique 83. 


+ L'appel à OpenResourceFile avec un pre- 
mier paramètre à O0 demande à GS/OS 
d'ouvrir le fichier avec le mode défini par 
le champ access dans le directory. Ainsi, si 
le fichier a été verrouillé, il ne sera ouvert 
qu'en lecture: ce n'est peut-être pas l'effet 
voulu. Il est sans doute préférable de spé- 
cifier explicitement le mode lecture/écri- 
ture lors de l'écriture, en passant la cons- 
tante Read WriteEnable, qui vaut 3. 


La séquence de réouverture du Resource 
Fork devient ainsi, plus simplement: 


OpenResourceFile (ReadWriteEnable, NIL, 
LGetpathname2 (Userld,&)). 


De plus, l'appel à UpdateResourceFile est 
inutile, car il est fait implicitement par 
CloseResourceFile, dès qu'une ressource a 
été marquée modifiée par MarkResource- 
Change. 


NDLR: Philippe Manet et. Apple ont rai- 
son. Ce bon vieux Bureau Politique a tiré une 
épine du pied de beaucoup de programmeurs 
avec ses dernières notes. Voyez les contribu- 
tions de Bernard Fournier dans ToolBox-Mag 
5 et 6, et comment Jean Destelle s'est égale- 
ment battu avec ce problème pour Sélect. 

Ceci dit, où, en-dehors des Macros et des In- 
cludes d'Apple, trouve-t-on une documenta- 
tion sur ces appels du Loader? 
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ee un M MON 


Des ressources 
clans les accessoires 


Bernard Fournier 


La note technique Apple n°71 contient un para- 
graphe expliquant comment employer des res- 
sources avec les accessoires de bureau (NDA). 
À priori, si une note technique décrit ce point de 
programmation, on peut raisonnablement sup- 
poser qu'il y a un problème pour qui aborde la 
chose sans ces précisions. 

En effet, la programmation d'un NDA avec des 
ressources va mettre en évidence le problème 
suivant: comment indiquer le chemin d'accès 
originel (le préfixe où se trouve le NDA et ses 
ressources) à notre NDA pour qu'il puisse cor- 
rectement charger ses ressources, même si le 
NDA ne se trouve pas dans le sous-catalogue 
/DESK.ACCS (par exemple si on a lancé le NDA 
à partir du Fonte-DA Installateur de F. Uhrich)? 
Ce problème étant particulièrement ardu, Apple 
a jugé bon de clarifier les choses en expliquant 
comment procéder. Ceci afin d'éviter des pro- 
grammations ‘sauvages qui produiraient des 
désastres. 

Dans la routine OPEN du NDA, il faut impéra- 
tivement suivre la séquence suivante: 

+ faire un GetCurResource App et conserver le ré- 
sultat dans une variable 

+ si on n'a pas déja alloué un ID à notre NDA, 
faire alors un MMStartUp 

+ faire un ResourceStartup avec l'identifiant fraî- 
chement défini. Il est en effet du ressort de cha- 
que application ou NDA de s'assurer que le Re- 
source Manager est correctement initialisé. 

+ grâce à LGetPathname2, on va récupérer un 
pointeur sur le préfixe d'accès au NDA (passer 
l'ID défini et la valeur $0001 comme para- 
mètres). 

+ afin d'éviter la fermeture accidentelle du fi- 
chier ressource, on va récupérer le file level avec 
la fonction GetLevel et on va le fixer temporaire- 
ment à 0 avec SetLevel. 

+ ensuite on récupère la valeur des préférences 
GS/OS par un GetSysPref: cette valeur est con- 
servée en lieu sûr, et avec une variable tempo- 
raire on va calculer la valeur qu'il faut pour for- 
cer le système à réclamer l'insertion du disque 
originel, en cas d'éjection intempestive de la dis- 
quette contenant les ressources du NDA. Cette 
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valeur s'obtient en faisant un AND $1FFF puis 
un ORA $8000 à la valeur ‘préférences’, et on 
passe ce paramètre à SetSysPrefs. 

+ puis on ouvre le fichier ressource avec Open- 
ResourceFile en lui indiquant le préfixe d'accès 
obtenu plus haut. Conserver soigneusement le 
FileID retourné pour pouvoir fermer le fichier | 
ressources ultérieurement. | 
+ maintenant on remet les valeurs originelles: 
SetSysPrefs avec la valeur conservée; puis Set- | 
Level pour remettre le niveau original et enfin 

un SetCurResourceApp pour remettre définitive- 

ment les choses en l'état. 

+ dans la routine Close, on aura deux choses à 

faire: un CloseResourceFile avec le FileID retour- 

né lors de l'ouverture; puis un ResourceShut- 

Down afin de remettre les choses en l'état. 





Voici ce que donnent ces consignes une fois 
transcrites: 


dans la routine OPEN: 
OrgApp:=GetCurResource App; 
MyNdalD:=MMStartUp; 
ResourceStartUp(MyNdalD); 
PathPtr:=LGetPathName2(MyNdalD,$0001); 
OrgLevel:=GetLevel; 

OrgPref=GetSysPref; 
NDAPref:=Band(OrgPref,$1FFF); 
NDAPref:=Bor(OrgPref,$8000); 
SetSysPref(ND'APref); 
ResID:=OpenResourceFile($C3,nil,PathPtr); 
SetSysPrefs(OrgPref); 

SetLevel(OrgLevel); 
SetCurResourceApp(OrgApp); 


dans la routine CLOSE: 
CloseResourceFile(ResID); 
ResourceShutDown; 





Et voilà, muni de ces renseignements, vous de- 
vriez pouvoir construire aisément vos NDA 
avec des ressources. On se donne rendez-vous 
dans ToolBox-Mag n° 7 pour un listing complet 
de NDA avec ressources? D'ici là, essayez de 
construire vos routines, envoyez-les à la rédac- 
tion. 

Et bonnes vacances! 


E 
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Traduction : 


SIariloois en C 


Philippe Manet 


NDLR: Dans notre série des “traductions”, voici une version en C, écrite par Philippe Manet, 
de la routine de Start UpTools pour les NDAs publiée en assembleur par Patrick Desnoues 
dans ToolBox-Mag 1. Vous trouverez les fichiers correspondants (StartTools.CC et Start- 


Tooïs.h) sur la disquette. 


Non seulement vous écrirez plus facilement vos accessoires en C, mais les sources donnent un 
exemple d'une instruction fort intéressante du C, dont nos spécialistes vous entretiendront un 


jour: la fonction... ASM! 


StariTools.cc 
[Démarrage et arrêt d'outils pour les NDA, 
reprenant la fonction de StartUpTools du 
système S.0 qui ne marche que pour les 
applications. 
Ces routines sont basées sur une table qui 
décrit les outils à démarrer; cette table est mise 
à jour pendant l'exécution de la routine de 
démarrage pour la routine d'arrêt. 
Adaptation en C des routines assembleur de 
Patrick Desnoues publiées dans ToolBox-Mag 
numéro 1.] 


#pragma optimize -1 


#include <Types.h> 
#include <Locator.h> 
#include <Memory.h> 
#include <Resources.h> 


#include <orca.h> 


#define _StartTools 
#include "StartTools.h" 
#undef _StartTools 


{StartNDATools (} - Démarrage des outils définis dans la 
liste. Le Resource Manager est démarré d'office.] 
Word StariNDATools ( Word userID, Word numTools, 
StartToolsPtr toolTable ) 
{ 
Word error, t00INum, t0olStatus, parmFlags; 
long numDPages; Pointer DPAddr; 
StartToolsPtr toolEntry; 
[ResManager est démarré systématiquement]. 
ResourceStartUp ( userlD }; 
if (error = toolerror (} } 
return ( error }; 
{Pour chacun des outils de la table, on teste son état et, 
en fonction du résultat, on le charge et on le démarre.] 
for ( toolEntry = 1001Table; numTools--; toolEntry++ ) { 
toolNum = toolEntry->to0l Number; 
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asm{ {appel de la fonction status de l'outil] 


Ida #0 
pha 
cle 
Ida to0INum 
adc #StatusCall 
tax 
jsl ToolBoxEntry 
sta error 
pla 
sta toolStatus 
} 
if ( error ) { {l'outil doit être chargé] 
LoadOneToo!l ( tool Num, 10olEntry- 
toolVersion }; 
if ( error = toolerror () } 
return ( error }; 
toolEntry->status = ToolLoaded; 
} else 
toolEntry->status = t001Status; 
[nitialisation de l'outil après allocation éventuelle 
des pages directes requises] 
if ( ! toolStatus } { 
parmFlags = toolEntry->parmFlags 
& numParmsMask; 
if ( parmFlags & DPParm ) { 
numDPages = ( toolEntry->parmFlags 
& numDPMask } >> DPOffset: 
DPAddr = * NewHandle (numDPages, 
userID | DPAuxID.attrLocked + attrFixed 
+ attrPage + attrBank, NULL }; 
if ( error = toolerror () ) 
return ( error }; 
} [allocation de la page directe] 
if ( parmElags & userIDParm } 
asm { 
pei userID 


} 
if ( parmFlags & DPParm ) 


asm { 
i DPAddr 
_ B 
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} 
asm { {appel de la fonction StartUp de l'outil] 
cle 
Ida t00INum 
adc #StartUpCall 
tax 
jsl ToolBoxEntry 
Sta Crror 
} 
if (error = toolerror () } 
return ( error }; 
} loutil à initialiser] 
} {boucle chargement/démarrage 
des outils de la table] 
return ( O }; {pas d'erreur] 
} {StartNDATools ()] 


{StopNDATools (} - Arrêt des outils démarrés 
précédemment] 
void StopNDATools ( Word userlD, 
Word numTools, Start ToolsPtr toolTable } 
{ 
StartToolsPtr toolEntry; 
Word toolNum, toolStatus: 
for ( toolEntry = t0olTable; numTools--: t00lEntry++ } { 
100ÏNum = toolEntry->to0lNumber: 
toolStatus = t00lEntry->status; 
if ( ! toolStatus || toolStatus == ToolLoaded ) 
asm { {appel de la fonction ShutDown de l'outil] 
clc 
Ida toolNum 
adc #ShutDownCall 
tax 
jsl ToolBoxEntry 
} 
if ( toolStatus == ToolLoaded } 
UnloadOneTool ( toolNum }; 
} [Boucle d'arrêt de tous les outils démarrés] 
DisposeAll ( userID | DPAuxID }; {Libération de la 
mémoire des pages directes] 
ResourceShutDown ()}; {arrêt du Res Manager] 
} {StopNDATools (}] 





StartTools.h 


[Fichier à inclure par toute application amenée 
à utiliser les routines de StartTools.CC] 


#ifndef __StartTools__ 
#define __StartTools__ 


#ifndef __TYPES__ 

#include <Types.h> 

#endif 

#define ToolLocator Ox01 
#define MemoryManager  0x02 
#define Miscellaneous 0x03 
#define QuickDraw 0x04 
#define DeskManager 0x05 
#define EventManager 0x06 
#define Scheduler 
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#define SoundTool 
#define ADB 

#define Sane 

#define IntegerMath 
#define TextTool 
#define WindowManager 
#define MenuManager 
#define Control Manager 
#define SystemLoader 
#define QDAuxiliary 
#define PrintManager 
#define LineEdit 
#define DialogManager 
#iefine ScrapManager 
#define StandardFile 
#define NoteSynthetize 
#define NoteSequencer 
#define FontManager 
#define ListManager 
define ACE 

#define ResourceManager 
#define MidiTool 
#define TextEdit 





[Définitions spécifiques aux routines de démarragetarrêt] 


#ifdef _StartTools 
#define ToolBoxEntry 
#define Start UpCall 
#define ShutDownCall 
#define StatusCall 
#define numParmsMask 
#define numDPMask 
#define DPOffset 
#define ToolLoaded 
l'on a fait LoadOneTool] 
#define DPAuxID 


mémoire allouée pour les pages directes] 


#endif 


0xE10000 
0x0200 
0x0300 
0x0600 
0x0003 
0x0300 

8 

OxB123 


0x0F00 


[indique que 


{auxID pour la 


[Valeurs des flags du champ parmsF lags ci-dessous] 


#define userIDParm 
#define DPParm 
#define oncDP 
#define twoDP 
#define threeDP 


0x0001 
0x0002 
0x0100 
0x0200 
0x0300 


{Cette structure décrit un outil à charger et démarrer] 


typedef struct { 
Word t00Ï Number; 
Word status; 
inactif charge, x = actif] 
Word parmFlags; 


Word tool Version; 


[Prototypes des fonctions disponibles :] 


{numéro de l'outil] 
[0 = inactif, OxB123 


[0 = aucun, 1 = userlD, 2 = 
Direct Page, 3 = userID + DP, 0x0?200 = nb de DP] 
[version minimum requise] 
} StartToolsRec, *StartToolsPtr, *StartToolHndl: 


Word StartNDATools ( Word userID, Word numTools, 


StartToolsPtr t001Table ): 


void StopNDATools ( Word userID, Word numTools, 


StartToolsPtr too]Table }; 
#endif 








Il ne lui 
même pas 


nanque 
la parole 1 


Jacques Liautard 


Quand tout le monde n’en était encore qu'à 
l'Apple IE, qui ne rêvait pas de faire parler son 
ordinateur? Quelques programmes proposaient 
une possibilité de rentrer par la prise K7 un son 
qui semblait, quand on arrivait à le ressortir, 
être le fin du fin... Les cartes Porte-parole ten- 
taient aussi de réaliser le rêve, mais n'étaient 
pas à la portée de toutes les bourses. 


Avec le II GS, le monde du son s'ouvre à tous. Je 
ne parle pas ici des possibilités de sortie, soit 
par la sortie haut parleur, soit par une carte sté- 
réo, mais plutôt de comment faire reconnaître 
un son, que ce soit en parole de synthèse, ou en 
son digitalisé. 


Parole de synthèse 
et son digitalisé 


Quelle est la différence fondamentale entre ces 
deux types de sons? Eh bien, la même qu'entre 
un dessin tracé sous Platinum Paint et une 
image digitalisée avec Quickie. Soit on “trace” 
soi-même, soit on réduit à des nombres des 
données extérieures. 

Concrètement, deux différences importantes: en 
premier lieu, la méthode employée, en second 
lieu, la taille du fichier obtenu. 


Les méthodes sont effectivement fondamentale- 
ment différentes. La parole de synthèse fait ap- 
pel à la programmation et uniquement à la pro- 
grammation, pas besoin de rajouter une carte 
particulière. Le logiciel TML Speech Toolkit suf- 
fit. 

La parole digitalisée, quant à elle, demande une 
carte. Sonic Blaster ou Audio Animator sont les 
plus diffusées, on peut parler aussi de la carte li- 
vrée avec le programme HyperStudio, qui est en 
mono, mais suffit pour la parole digitalisée. 


La parole de synthèse 


Principaux avantages de la parole de synthèse, 
la taille du fichier à utiliser est minime et sur- 
tout, elle permet un dialogue aléatoire avec un 
utilisateur. Alors est-ce la panacée? Non, pas 
vraiment, car son défaut est d'avoir été créée 
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aux Etats-Unis, avec près de 1200 règles gram- 
maticales et du coup de parler en anglais. 
Mais, rassurez vous, il est possible de l'utiliser 
en faisant parler en français, en espagnol, en ita- 
lien, en allemand etc, ceci au prix de quelques 
modifications ou astuces dont nous parlerons 
un peu plus loin. 


La parole interactive 


Comment utiliser la parole de synthèse de ma- 
nière interactive, c'est à dire en réalisant un dia- 
logue, et donc sans parler des programmes 
comme la série des MATH TALK, FIRST LETTERS 
AND WORDS, FIRST SHAPES, etc, programmes 
pour les petits dont les paroles sont entièrement 
de synthèse, mais qui ne vous permettent pas 
de taper vos propres mots? 

Deux possibilités s'offrent à vous. En program- 
mant ou sans programmer. 


Les programmes existants 


Sans passer par la programmation, nous trou- 
vons deux traitements de texte du commerce : 
SMOOTHTALKER et KIDSTALK, (qui ne diffère 
de SMOOTHTALKER que par l'environnement 
plus adapté aux enfants), le programme 
d'exemple livré avec TML SPEECH TOOLKIT : 
LET'S TALK, et un freeware (de votre serviteur): 
SAKOZ, destiné en même temps aux enfants en 
leur permettant d'entendre les lettres ou chiffres 
qu'ils tapent au clavier, et aux adultes car une 
boîte de dialogue permet de jongler avec les 
phonèmes, et les sources en C, présents sur la 
disquette, permettent de s'initier à la program- 
mation de la parole de synthèse. 


En programmant soi-même 


Le vrai domaine de la parole de synthèse reste 
la programmation. Vous désirez établir un dia- 
logue sonore avec l'utilisateur, aucun problème, 
à chaque lettre, symbole ou mot tapé, le son cor- 
respondant sortira sur le haut parleur. 

En mode programmation, il ne faut pas oublier 
d'inclure les TOOLS 50, 51 et 52 dans le sous-ca- 
talogue /Tools de votre système. 
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Quels sont les langages comportant des librai- 
ries pour utiliser ces outils? TML BASIC, le PAS- 
CAL et le C. Donc vous avez l'embarras du 
choix, à chacun sa librairie. 


Francisation de 
la parole de synthèse 


Oui, mais, que ce soient les traitements de texte 
ou les outils de programmation, c'est prononcé 
en anglais ! 

Effectivement, nous en arrivons aux trucs et as- 
tuces pour faire parler le IIGS en bon français, 
ou plutôt dans un français avec un accent an- 
glais plus ou moins prononcé suivant les mots. 


La parole de synthèse utilise la phonétique. Les 
phonèmes sont les éléments sonores du langage, 
qui, combinés, nous font entendre un son qui 
correspond à une lettre, mot ou phrase. Le TML 
SPEECH TOOLKIT utilise les 41 codes phonéti- 
ques suivants : 


Æ - EH - IH - AA - AH - EY - IY - AY - OW - UW 
- AO - UH - AX -OY - AW-ER-p-t-CH-k- 
b-d-j-g-f-TH-s-SH-v-DH-z-ZH-1- 
m-n-NG-h-r-w-WH-y 


Attention à surtout bien respecter les majus- 
cules/minuscules, sinon les phonèmes ne seront 
pas prononcés. 


Si vous utilisez un des programmes mentionnés 
plus haut, vous pouvez visualiser quel pho- 
nème anglais correspondant à quelle lettre. Par 
exemple, le A aura pour phonème AX et le E 
pour phonème lY. C'est là qu'intervient une as- 
tuce, pourquoi ne pas aller voir un peu à quoi 
ressemble le programme SMOOTHTALKER ou 
bien le TOOLO52... 


Comment? Avec Appleworks 3.0 par exemple, 
pour déjà avoir une idée de ce que l’on re- 
cherche, puis avec un éditeur de blocs pour 
faire quelques modifications. 

Chargez avec Appleworks 3.0, en fichier texte 
ascii, le programme SmoothTalker, ou le 
Tool052. 

Une fois sur le bureau, faîtes une recherche de 
AX dans Smoothtalker par exemple, vous allez 
en trouver 34 orthographiés en majuscule. AX 
étant la représentation anglaise en phonème de 
la lettre A. 

Auparavant, vous aurez remarqué que si vous 
utilisez le phonème Æ, vous entendez le son A 
(comme dans sac), alors que si vous utilisez le 
phonème AX, vous entendez le son E (comme 
dans leu), pourquoi ne pas, avec votre éditeur 
de blocs favori, aller remplacer les 34 occu- 
rences de AX par 34 Æ, et ainsi de suite pour 
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que les phonèmes anglais deviennent des pho- 
nèmes français? 


Toujours sous Appleworks 3.0, vous allez trou- 
ver en plus des phonèmes individuels, des 
groupes de phonèmes comme dAHbAXIyUW 
qui correspondant à la prononciation de la lettre 
W en anglais. 

Il ne reste plus qu'à remplacer cet ensemble par 
dAWbIVIH pour obtenir un W prononcé à la 
française. 

Puisque vous en êtes aux groupes de phonèmes, 
le dictionnaire des exceptions du programme ou 
de l'outil comporte une série de phonèmes 
comme jÆnyUWEHrlY pour january, ou encore 
kKIOWZ pour close, qu'il ne vous reste qu’à mo- 
difier en jEWvylY pour janvier ou flHrm pour 
ferme. 

Vous êtes évidemment limités à la taille de la 
chaîne d'origine que vous ne pouvez pas dépas- 
ser, mais au bout d'un petit moment, l'expé- 
rience aidant, vous francisez entièrement le pro- 
gramme ou l'outil. 

Une fois tous les phonèmes modifiés, vous 
constaterez qu'il est difficile, sinon impossible 
de faire prononcer un U correct français, ainsi 
qu'un son R. De même, vous avez francisé les 
chiffres, mais les 16, 17, 18 et 19 vous poseront 
un problème dans le sens ou en anglais ils se 
disent sixteen, seventeen, eighteen et nineteen, 
ce qui donnera en français sixdix, septdix, huit- 
dix et neufdix. Qu’'à cela ne tienne, vous vous 
fabriquez alors votre propre dictionnaire des 
exceptions. 


Disponible aussi bien dans SMOOTHTALKER 
qu'en programmation, le dictionnaire des ex- 
ceptions permet de faire correspondre une série 
de phonèmes à un mot. Par exemple, vous dési- 
rez que la chaîne de caractères MOTO ne soit 
pas prononcée MOTO , mais VRAOUUM, il suf- 
fit d'appeler le dictionnaire et d'inclure le mot 
MOTO avec sa représentation en phonèmes 
vrÆAWmmmm. 

Quand le texte ou le programme rencontrera 
MOTO, il prononcera VRAOUUM. 

Pour les chiffres mentionnés ci-dessus, pour les 
noms propres ou pour toutes sortes d'anima- 
tions, enrichissez le plus possible votre diction- 
naire des exceptions. 


La programmation. 
de la parole de synthèse 


Quelques mots sur la programmation de la pa- 
role de synthèse. Outre les outils de démarrage 
ou de fermeture de la parole (SpeechStartup ou 
SpeechShutDown), vous avez deux possi- FN 
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bilités différentes pour faire parler le II GS. L'in- 
struction SAY ou l'instruction PARSE. 


L'instruction SAY se contente de récupérer une 
chaîne de caractères, de l’interpréter et de la 
prononcer. Les seuls réglages possibles sont le 
Genre, la Tonalité, la Hauteur, la Vitesse, et le 
Volume en utilisant avant l'instruction SAY, 
l'instruction SetSayGlobals(Genre,Tonalité,Hau- 
teur, Vitesse, Volume) qui effectue les réglages 
voulus. 


EXEMPLE EN C DE L'INSTRUCTION SAY 


ParoleDirecte(Son, Voix) 

int Son; 

int Genre; 

{ 
SetSayGlobals(Genre,Tonalité, Hauteur, 
Vitesse, Volume); 
chaine[0]=(char) strlen(chaine+1); 
Say(chaine); 


} l* fin de la fonction parole directe */ 


L'instruction PARSE est beaucoup plus puis- 
sante car elle traduit une chaîne de caractères en 
phonèmes. Une fois les phonèmes obtenus, en 
appelant les instruction MALESPEAK ou FEMA- 
LESPEAK, vous faîtes dire exactement ce que 
vous désirez avec la modulation désirée dans la 
voix. 

Par exemple, le prénom CAMILLE n'est pas dit 
d'une façon uniforme, tout sur le même ton. 
Vous élevez le ton pour le début du mot, puis 
vous baissez le ton pour la fin du mot. En fai- 
sant prononcer des phonèmes, vous pourrez 
faire la même chose, vous  écrirez 
5kÆmyyyyy3AX, ce qui donnera un effet d'af- 
faiblissement de la prononciation de la fin du 
mot, chose impossible à obtenir avec l'instruc- 
tion SAY. 


EXEMPLE DES INSTRUCTIONS 
PARSE ET MALESPEAK EN C 


TextenPhoneme(Son,Voix,PhVol,PhVit,PhHau) 

int Son; 

int Genre; 

{ l* traduit texte normal en phonèmes *| 
Parse(chaine,Phonetique,1); 


[* appel à la fonction pour prononcer 
les phonèmes */ 
ParlePhoneme(Son,Genre,PhVol,PhVit, 
PhHau,Phonetique); 

} l* fin de la fonction TextenPhoneme() * 


ParlePhoneme(Son,Genre,PhVol,PhVit, 
PhHau,Phonetique) 
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int Son, Genre, PhVol, PhVit, PhHau; 

char Phonetiquel]; 

{ 
MaleSpeak(PhVol,PhVit,PhHau,Phonetique); 
f* Volume, Vitesse, Hauteur, Adr chaîne *{ 

} F* fin fonction ParlePhoneme() * 


Vous aurez remarqué au passage que la parole 
de synthèse permet aussi de changer le genre de 
la voix, genre homme ou genre femme, soit en 
passant un paramètre à 0 ou 1 à SAY, soit en uti- 
lisant PARSE puis MALESPEAK ou FEMALES- 
PEAK. 


Pour plus de détails sur toutes ces fonctions et 
les autres fonctions de TML SPEECH TOOLKIT, 
se reporter à la documentation et aux exemples. 


Après avoir fait un petit tour de la parole de 
synthèse, il est temps de se consacrer à la parole 
digitalisée. 

Parole digitalisée 


Comme le mot l'indique, il faut digitaliser le son 
pour obtenir de la parole digitalisée. Comme 
pour la parole de synthèse, cette méthode com- 
porte des avantages et des inconvénients. 


L'avantage est bien sûr la qualité du son obtenu, 
l'inconvénient est la taille du fichier à utiliser et 
le manque d’interactivité avec l'utilisateur. 


Comment obtenir non seulement de la parole, 
mais plus généralement un son digitalisé? A 
partir d’une carte de digitalisation de son. Ac- 
tuellement, et suivant vos moyens, vous avez 3 
possibilités. 

Comment digitaliser 


La solution la moins chère est d'acheter le pro- 
gramme HYPERSTUDIO, car non seulement 
vous avez le programme, mais en plus une carte 
de digitalisation et un micro. En revanche, im- 
possible de sortir en stéréo sur votre chaîne. 

Un tout petit peu plus cher, mais guère plus, la 
carte Sonic Blaster qui comporte une entrée sté- 
réo et une sortie stéréo par l'intermédiaire de 
deux prises type jack 3.5. Le programme livré 
avec permet de digitaliser à différentes fré- 
quences, depuis 5.082 HZ jusqu'à 30.368 HZ. 

Plus vous utilisez une fréquence basse, moins 
importante sera la taille du fichier pour une du- 
rée identique, mais, revers de la médaille, moins 
le son sera de bonne qualité. Vous voulez digi- 
taliser le bruit d’un coup de pistolet, 8.000 HZ 
pourra aller, vous voulez digitaliser une voix, le 
minimum est 10.000 HZ, quant à de la musique, 
en dessous de 15.000 HZ, la qualité ne sera pas 
au rendez-vous. Un bon rendu des sons he 
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s'obtient avec une fréquence d'environ 
21.000 HZ, mais attention, un fichier devient 
vite énorme... 

Autres possibilités du programme, jouer avec 
les sons. Vous pouvez les copier/couper/coller, 
faire prononcer à l'envers, mettre de l'écho, faire 
débuter le son de zéro jusqu’au volume normal 
(fade up), faire arrêter le son en douceur (fade 
down), faire accélérer, ralentir la vitesse, etc, 
bref de quoi réaliser d’excellents effets sonores 
et amuser les petits et les grands. 


Dernière solution pour digitaliser les sons, la 
carte Audio Animator, qui diffère essentiellement 
de la Sonic Blaster par sa possibilité de gérer les 
entrées/sorties Midi et donc à raccorder au 
IIGS n'importe quel instrument Midi. Je ne 
m'étendrais pas sur cette partie musicale, lais- 
sant aux charpentiers le soin de le faire. 

L'Audio Animator est équipée d’une petite boîte 
qui se place à côté du II GS et sur laquelle vien- 
nent se raccorder toutes les entrées/sorties. Que 
ce soient les entrées/sorties Midi avec des 
prises DIN, les entrées/sorties son stéréo avec 
des prises RCA (deux en entrée et deux en sor- 
tie), l'entrée Micro et la sortie Casque. 

Sur le dessus de la boîte, cinq curseurs règlent le 
volume de sortie (canal droit et canal gauche), le 
volume d'entrée (canal droit et canal gauche) et 
le volume d'entrée du micro. 

Le programme pour digitaliser ressemble 
comme deux gouttes d’eau à celui de la Sonic 
Blaster, à part deux ou trois modifications, 
comme les fréquences de digitalisation qui vont 
de 5.262 HZ à 37.000 HZ. 


Une fois que vous avez digitalisé votre son, 
qu'il vous plaît comme il est, et que vous voulez 
le sauvegarder, plusieurs possibilités de sauve- 
garde s'offrent à vous. En type Æ Format, 2:1 
Compressed, Raw Data, AIFF Format ou 2.67:1 
Compressed. 

Libre à vous de sauvegarder votre fichier dans 
le format que vous utiliserez par la suite, de 
toutes façons, si une fois le fichier sauvegardé 
dans un format vous décidez de le sauvegarder 
dans un autre format, il suffit de le rappeler, 
puis de le resauvegarder avec un format diffé- 
rent. 

[NDLR: attention cependant, la compression de fi- 
chiers sons n'est pas une compression “à la Shrin- 
kit", en ce sens que le fichier une fois décompressé 
n'est plus identique au fichier original, les sons sont 
légèrement “lissés”. Décompresser et recompresser 
plusieurs fois le même fichier son dégrade progressi- 
vement sa qualité, de la même façon que les copies 
de copies de copies de cassette audio dégradent le son 
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d'origine. Il est conseillé de conserver un exemplaire 
du son en format non-compressé.] 


De la même manière, une façon de franciser des 
programmes américains utilisant les sons digita- 
lisés (Chessmaster 2100 ou la série des Talking. 
Talking colors, Talking dinosaurs, etc) est de 
charger un son du programme, de voir à quelle 
fréquence et sous quelle forme il a été créé, puis 
de digitaliser le même son en français avec les 
mêmes caractéristiques pour remplacer le son 
d'origine. 
Comment utiliser 
les sons digitalisés 


Plusieurs possibilités. Celle évoquée plus haut 
pour changer les sons d'un programme, simple- 
ment jouer avec les sons pour se fabriquer par 
exemple son message sur le répondeur télépho- 
nique, ou utiliser les sons dans ses propres pro- 
grammes, ou dans les piles HyperStudio, ou les 
piles HyperCard. 


Utiliser les sons en programmation 


Tous les langages permettent de récupérer les 
sons digitalisés. L'interface avec la Toolbox 
s'utilise de la même manière, voici en C com- 
ment récupérer un son : 


EXEMPLE DE RECUPERATION 
D'UN SON DIGITALISE EN C 


{* Paramètres pour struct fichier son */ 
SoundParamBlock sonParms1: 
son(BufSon,TailSon,tempor,volume) 


Pointer BufSon;  /* Pointeur sur l'adresse 
du son en mémoire *| 

Long TailSon; Î* Taille du fichier son */ 

int tempor; [* Fréquence pour restituer 


le son, 400 pour 21803HZ*/ 
int volume; {* Volume du son */ 
{ 
sonParms1.waveStart = BufSon; 
sonParms1.waveSize = TailSon/256; 
sonParms1.fregOffset = tempor; 
sonParms1.docBuffer = 0; 
sonParms1.bufferSize = 0; 
sonParms1.next WavePtr = OL; 
sonParms1.volSetting = volume; 


{* on arrête le son en cours *] 
FFStopSound(Ox7fff); 
{* on joue le son demandé */ 
FFStartSound(0x0001,&sonParms1); 
} l* fin de la fonction son() *] 


Il suffit ensuite d'appeler la fonction son() avec 
les bons paramètres pour jouer le son digitalisé. 


> 
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Dans une pile HyperStudio 


Tout d’abord, aller changer le type du fichier 
son digitalisé pour qu'il soit reconnu par Hyper- 
Studio. C'est très simple, il suffit de lancer 
SoundShop, livré avec HyperStudio, de charger 
le son, puis de le sauvegarder. 

Ensuite, quand vous crééz un bouton dans une 
carte HyperStudio, vous cochez devant “play a 
sound” (jouer un son). Le programme vous de- 
mande de cliquer le son, puis une fois le son 
trouvé vous propose de l'écouter et enfin, vous 
propose de l'incorporer à la pile ou de le laisser 
sur disque. Dans le premier cas, la pile sera plus 
importante en taille, mais le son sera joué quasi 
instantanément, dans le second, un même son 
peut servir à plusieurs endroits et bien qu'il 
faille un petit temps de réponse, la taille de la 
pile restera raisonnable. 

Avec HyperStudio, contrairement à la program- 
mation et à HyperCard, pas besoin de tenir 
compte de la fréquence de digitalisation, le son 
est restitué à la bonne fréquence. En contrepar- 
tie, il n’est pas possible de jouer avec le son en le 
faisant aller plus ou moins vite, ou en n’en fai- 
sant jouer qu'une partie. 


Dans une pile HyperCard 


HyperCard gère les sons d’une manière tout à 
fait différente puisqu'il utilise les ressources. 
Cela supprime la question de la gestion de la 
mémoire, le Resource Manager s'en charge. 
Première constatation, il faut transformer le fi- 
chier son en ressource. Qu'à cela ne tienne, on 
prend GENESYS, on transforme le son en res- 
source en l'incluant au passage dans la pile Hy- 
perCard, on lance la pile HyperCard, on crée un 
bouton associé au son, on écoute et BOING le 
II GS est planté! 

Pas de panique, on recommence à zéro et on va 
y arriver, mais c'est un petit peu plus compliqué 
qu'en programmation ou qu'avec HyperStudio, 
en revanche le résultat en vaut la peine. 
Genesys, éditeur de ressources, est incapable 
d'ouvrir une pile HyperCard qui ne contient 
pas de ressource. Il faut donc d'abord transférer 
une ressource son (ou autre) dans notre pile 
grâce à la commande RESCOPY d'HyperCard. 
Deuxième constatation, en prenant un même 
son, puis en le sauvegardant sous des types dif- 
férents (Æ Format, RAW Data ou HyperStudio), 
on s'aperçoit que le son digitalisé ne débute 
vraiment qu'après une série plus ou moins 
grande d'octets, cette série d’octets étant des in- 
dications se rapportant au fichier pour chaque 
type. HyperCard pour sa part, demande une 
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série de 10 octets nuls avant le début du son, 
avec le 3ème octet représentant l'octet de poids 
fort de la taille du son. 

Exemple, soit un son digitalisé d’une taille de 
19520 Octets, sa taille est en Hexa de $4C40, 
l'en-tête du fichier son à incorporer dans Hyper- 
Card devra être : 

00 00 4C 00 00 00 00 00 00 00 


Comment inclure un son 
dans HyperCard 


Voici comment modifier un fichier son pour 
l'inclure dans HyperCard. Plusieurs solutions 
s'offrent à vous, suivant les programmes ou les 
accessoires de bureau que vous possédez. 


+ Première solution, la plus simple, CUSTOM 
REZ V1.5. Ce freeware, écrit par Mlle Carole Fox 
(auteur entre autres du Jeu de l’oie et de Mémo- 
cartes) charge un fichier son et l’incorpore direc- 
tement dans une pile HyperCard après avoir 
modifié l'en-tête du fichier. On ne peut pas faire 
plus simple, mais tout le monde n’a pas ce free- 
ware. 

e Deuxième solution, MOULISONS. Ce freeware 
de votre serviteur permet de charger un son 
type Æ Format, RAW Data ou HyperStudio et 
de le sauvegarder en modifiant l'en-tête du fi- 
chier. Il ne reste plus ensuite, avec GENESYS, 
qu'à charger la pile HyperCard, et importer le 
fichier son modifié par Moulisons pour l'incor- 
porer en ressource son (type $8024) dans la pile. 
N'oubliez pas d'aller sur Attributes pour avoir 
le nom de ressource que vous voulez et de co- 
cher le Niveau 2 de purge. 

+ Troisième solution, DUMP. Cet autre free- 
ware, écrit par Michel Falempin, permet de 
charger en mémoire un fichier, puis de suppri- 
mer une série d'octets (les premiers concernant 
le type du fichier), puis de rajouter une série 
d'octets (les 10 octets demandés par Hyper- 
Card), et enfin de modifier la valeur des 10 oc- 
tets rajoutés, tous à zéro, sauf le 3ème. 

e Dernière solution, avec PEEKIT, WRITEIT et un 
éditeur de blocs. Solution un peu plus compli- 
quée, sans être difficile, mais utile à connaître si 
vous n'avez pas sous la main les programmes 
pré-cités. 

Prenez l'accessoire de bureau PEEKIT. 

Chargez votre fichier son. 

Sélectionnez uniquement la partie son propre- 
ment dite, sans les indications de type de fichier 
du début. 

Copiez avec le menu EDIT, fermez PEEKIT. 
Prenez l'accessoire de bureau WRITEIT. 

Collez avec le menu EDIT ce que vous avez 
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copié précédemment. 

Placez votre curseur en début de fichier et insé- 
rez 10 lettres, par exemple le chiffre 0. 
Sauvegardez le fichier dans le dossier que vous 
voulez, mais surtout sous format Texte. 

Fermez WRITEIT et lancez votre éditeur de blocs 
en sélectionnant avec l'éditeur le fichier sauve- 
gardé sous WRITEIT. 

Modifiez les 10 premiers octets en mettant des 
00 à la place 

Modifiez le 3ème octet en mettant la valeur hexa 
de l’octet de poids fort de la taille du fichier. 
Ecrivez le nouveau bloc à la place de l’ancien, 
votre fichier est prêt à être incorporé dans une 
pile HyperCard avec Genesys. 


Jouer un son dans HyperCard 


Votre son, digitalisé, modifié pour l'en-tête, 
transformé en ressource et inclus dans votre pile 
HyperCard est maintenant prêt à être joué. 
Grâce au langage HyperTalk, vous allez pou- 
voir jouer le son quand vous le désirez, que ce 
soit à l'ouverture d'une pile, d'une carte, en pas- 
sant la souris sur un bouton, en cliquant, bref 
quand et où vous le voulez. 

Contrairement à HyperStudio, le son avec Hy- 
perCard est géré comme une note de musique. 
Même si votre son dure trois minutes, pour Hy- 
perCard, ce sera une note de trois minutes. 
Avantage de cette technique, vous pourrez gé- 
rer votre son en le faisant jouer avec la hauteur 
de note que vous voudrez et dans l'octave que 
vous voudrez. 

En pratique : vous avez inclus dans votre pile le 
son BONJOUR. Vous désirez qu'à l'ouverture de 
votre carte, on entende BONJOUR, cliquez sur 
CARD INFO, puis sur SCRIPT. 

Une boîte de dialogue s'ouvre, dans laquelle 






A propos des ressources sons 


Il existe désormais un format officiel Apple 
pour les ressources sons-digitalisés ($8024), 
telles que les utilise par exemple HyperCard. 
Ce format est détaillé dans la Note Technique 
Apple 11 GS N°76, et repris dans le livre Hy- 
perCard IIGS Script Language Guide, The 
HyperTalk Language (Addison-Wesley), page 
147. 

Il y à bien 10 octets d'en-tête, mais ces 10 oc- 
tets ne se limitent pas à la taïlle du fichier en 
pages. Il semble cependant qu'HyperCard se: 
contente de la valeur évoquée par Jacques 
Liautard: ça marche en tout cas comme ça, 
voyez les pilés sur le disque. 


JYB 
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vous allez taper : 
on openCard 

play"bonjour" 
end openCard 
Cliquez sur OK, la prochaine fois que vous ou- 
vrirez votre pile, vous entendrez BONJOUR. 
Seul léger problème, si HyperCard, comme vu 
précédemment, gère le son comme une note de 
musique, il prend par défaut une fréquence 
d'environ 21.000 HZ. Ainsi, si votre son a été di- 
gitalisé à cette fréquence, le son sera joué nor- 
malement, en revanche, si votre son a été digita- 
lisé à 10.000 HZ, il sera joué deux fois trop vite. 
Il faut alors modifier la vitesse d'exécution en 
donnant la note et l’octave correspondant. Pour 
une vitesse de 10.000 HZ, il faut mettre G2, ce 
qui correspondant à un SOL 2ème octave. Hy- 
perCard reconnait les notes américaines (C = 
DO, D=RE,E = MI, F = FA, G = SOL, A = LA, B = 
SI). 
Pour que le son soit joué avec la bonne vitesse, il 
faut utiliser l'instruction TEMPO qui détermine 
la vitesse d'exécution, il faut aussi associer à la 
note, la durée de la note (ronde, blanche etc...) 
ce qui donne, toujours pour BONJOUR : 
on openCard 

play"bonjour" tempo 70 “g2w" 
end openCard 
La valeur 70 détermine la vitesse d'exécution de 
la note, en conséquence, si des grésillements se 
font entendre après le BONJOUR, ou si le temps 
de réponse de la commande suivante est trop 
long, la vitesse est trop longue, il faut plutôt 
mettre 80, voire 90 comme valeur. En revanche, 
si BONJOUR n'est prononcé que BON, par 
exemple, il faut rallonger la vitesse et mettre 60 
ou 50. 
La lettre W correspond à une ronde (W = ronde, 
H = blanche, Q = noire, E = croche, S = double 
croche, T = triple croche, X = quadruple croche). 
Dernière précision, il est aussi possible de 
mettre des altérations, bémols ou dièses (Gb2W 
pour une Ronde SOL Bémol 2ème octave). 


Pour plus d'informations sur les possibilités 
(très étendues) du langage interprété Hyper- 
Talk, reportez vous à la documentation du pro- 
gramme, au livre sur HyperTalk GS édité par 
Addison-Wesley, ou aux guides Marabout sur 
HyperCard et HyperTalk. 


A présent vous avez tous les éléments pour 
faire parler votre II GS, à vous de choisir entre 
la parole de synthèse et les sons digitalisés, 
entre l'utilisation des programmes existants ou 
la programmation. En fin de compte, pourquoi 
ne pas tout essayer ? FA 
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Deux éditeurs 
oour APW/Orea 


Bernard Fournier 


En début d'année sont apparus sur le marché 
deux produits concurrents qui faisaient cruelle- 
ment défaut: des éditeurs de sources multi-lan- 
gages et multi-fichiers pour APW /Orca. 

Jusqu'à présent, l'éditeur texte d'APW/Orca ne 
permettait d'éditer qu'un seul fichier à la fois: 
désormais on dispose d'outils puissants permet- 
tant l'édition simultanée de plusieurs sources de 
toutes origines (Assembleur, C, Pascal, scripts, 
etc). De plus, des fonctions très performantes de 
recherche/remplacement et de couper/coller 
rendent ces éditeurs indispensables. 


MaxEd 


MaxEd 1.0 est un produit de 360 Micro Systems 
(éditeur de différents utilitaires APW /Orca). 
Cet éditeur est certainement le plus performant, 
mais aussi le plus complexe. Il se présente sous 
la forme d'un utilitaire et d'un dossier à installer 
dans le dossier /UTILITIES de APW/Orca, ainsi 
que d'un outil (le tool 56) à mettre dans /SYS- 
TEM/TOOLS de la disquette de démarrage. 
Toutes les fonctions très performantes de 
MaxEd résident dans l'emploi d'un outil spécifi- 
que (dont il devrait être possible d'utiliser les 
fonctionnalités à partir d'autres applications. 
mais cela est une autre histoire !). 

Lorsqu'on lance MaxEd, on arrive dans un me- 
nu offrant trois possibilité: passer dans l'éditeur, 
configurer ce même éditeur, et enfin employer 
les utilitaires système. 


L'éditeur de MaxEd 


MaxEd permet le chargement en mémoire de 
30 (!) fichiers sources simultanés accessibles par 
une commande de bascule (G-Q). Chaque 
source peut être de toute origine: assembleur (y 
compris Merlin), C, Pascal (y compris TML), 
texte, link, script. Pour chaque type, une règle 
de tabulation spécifique est définie, permettant 
de conserver la mise en page lors d'éditions ul- 
térieures dans l'éditeur spécifique. 

L'éditeur MaxEd dispose de fonctions de cou- 
per/coller extrêmement riches: soit de manière 
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interne (on déplace un bloc de texte à l'intérieur 
du même source), de manière locale (un bloc de 
texte est archivé dans un presse-papiers lié au 
source), de manière globale (un bloc de texte est 
archivé dans un presse-papiers disponible à 
partir de n'importe quel autre source), dans un 
presse-papiers Annulation (ce qui est effacé par 
G-D est archivé dans ce presse-papiers et est ré- 
cupérable par G-Z), et enfin via le presse- 
papiers système (archivage dans un fichier sur 
disque). On peut aussi purger ces presse- 
papiers et les commuter: le global devenant lo- 
cal et réciproquement. 

Comme pour tout éditeur qui se respecte, la 
gestion des déplacements est très souple: lettre 
par lettre, ligne par ligne, mot par mot, page par 
page et sur les tabulations; le tout bien entendu 
en avant/arrière et haut/bas; ainsi qu'un dépla- 
cement par fraction relative (G-1 à 9) dans le 
style Appleworks. 

On dispose également de fonctions d'impres- 
sion très performantes: impression de la page 
écran, du fichier (en totalité ou partie sélection- 
née) avec configuration du périphérique (impri- 
mante Imagewriter, port série, port modem, ré- 
seau Appletalk, port disque...) 

Une aide en ligne (G-?) permet de visionner ra- 
pidement la totalité des commandes dispo- 
nibles, et on peut définir un délai de sauvegarde 
automatique (de 30s à 20 mn) afin de ne pas 
perdre intempestivement le travail d'une nuit ! 


Fonctions spécifiques 


Quelques fonctions spécifiques à cet éditeur fa- 
cilitent grandement la vie du programmeur: 

+ affichage des 256 caractères ASCII avec possi- 
bilité de copier/coller tout caractère vers le do- 
cument (on aura ainsi la possibilité de taper des 
codes ASCII supérieurs à 128 pour des affi- 
chages graphiques) 

+ calculs ‘à la volée": saisie de formules accep- 
tant des données en hexadécimal, binaire, déci- 
mal ou ASCII (il manque l'octal pour les C-ma- 
niaques) et résultats affichés dans les 4 modes. 

* définition de macros sauvegardables: les Es 
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nn mi mennes 


macros sont associées à des séquences de 
touches programmables (par exemple option- 
caractère, option-G-caractère, option-shift-carac- 
tère). Les macros sont actives tant dans l'éditeur 
que dans les menus de configuration. 

+ macros pré-définies pour passer très rapide- 
ment d'une fonction à l'autre ou d'un fichier à 
l'autre. 


La configuration de l'éditeur 


Dans MaxEd, on peut: 

+ définir et archiver ses propres règles de tabu- 
lation; 

+ définir les options d'impression (lignes par 
page, taille des caractères, séquence d'initialisa- 
tion, port imprimante); 

+ définir ses propres commandes: en standard 
est fourni un jeu de commandes APW (les com- 
mandes sont semblables à celles de l'éditeur 
d'APW) et un jeu standard (les commandes sont 
semblables à celles des éditeurs de texte classi- 
ques). Mais on peut aussi créer son propre jeu 
(par exemple définir G-E pour Effacer au lieu de 
G-D) 

+ spécifier les fichiers à charger à chaque lan- 
cement de MaxEd (ce qui évite d'avoir à le faire 
manuellement). Outre cette fonction Auto-load, 
on peut indiquer des fichiers à charger lors de la 
frappe de la commande de lancement de 
MaxEd, ou éditer tout fichier à notre conve- 
nance à tout moment à partir de l'éditeur. 


Les utilitaires système 


Pour le moment, MaxEd ne dispose que d'un 
utilitaire, le MiniShell. Cet utilitaire permet de 
disposer de toutes les fonctions du shell 
APW/Orca. Dans la documentation, il est spéci- 
fié que certains ‘plantages' peuvent survenir lors 
de l'emploi de certaines commandes dans le mi- 
ni-shell, et les auteurs attribuent ces inconvé- 
nients à APW/Orca. En attendant les nouveaux 
utilitaires de développement ByteWorks (dispo- 
nibles dans les tous prochains jours) dont on 
peut espérer qu'ils n'auront plus ces bugs fà- 
cheux, on peut aisément contourner le pro- 
blème. 

En effet, un des aspects fabuleux de MaxEd 
consiste à garder présents en mémoire la totali- 
té des fichiers même lorsqu'on lance une autre 
application! On peut donc quitter MaxEd, lan- 
cer un utilitaire APW/Orca (ou toute applica- 
tion de votre choix) et lorsqu'on revient dans 
MaxEd, les 30 fichiers avec leurs presse-papiers 
sont encore là (du moins dans la mesure où le 
Memory Manager n'a pas été contraint de pur- 
ger la mémoire pour cause d'encombrement 
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massif: ce qui prouve une fois de plus que les 
prévoyants ayant équipé leur GS d'une carte 
RAM additionnelle de 4 mégas ne le regrette- 
ront pas). 


Les inconvénients de MaxEd 


Ils sont rares, mais on peut signaler: 

+ la non-conversion des codes ayant le bit 8 po- 
sitionné (ce qui permettrait de récupérer les fi- 
chiers TML sans les I-inverse à la place des ta- 
bulations); 

+ l'absence de multi-fenêtrage dans l'éditeur; 

+ la modification du langage dans le tableau de 
bord: le système 5.04 vf permet en effet l'affi- 
chage des caractères étendus via l'option FRAN- 
CAIS, mais en quittant MaxEd cette option est 
remise sur USA. 


Edit 16 v1.0 


Edit 16 v1.0 est un produit de Simple Software 
System International (l'éditeur de Genesys). 

Cet éditeur, sorti en même temps que MaxEd, 
est très performant, ayant privilégié la facilité 
d'emploi sur la richesse des commandes. Si on 
le compare à son concurrent, on note les points 
de différence suivants: 


Les moins’ 


e édition simultanée de 9 fichiers seulement, 
sans conservation en mémoire lorsqu'on quitte 
l'éditeur; 

+ ne conserve pas les types des fichiers édités 
(par exemple le TML est analysé comme un 
simple fichier Texte); 

+ presse-papiers classique: moins riche que ce- 
lui de MaxEd mais plus simple d'emploi diront 
certains. Affaire de goût; 

+9 macros définissables seulement: associées 
aux touches numériques. Choix trop limité. 


Les ‘plus’ 


+ affichage et impression du presse-papiers; 

+ multi-fenêtrage: mais on ne peut avoir que 
deux fichiers différents dans deux fenêtres hori- 
zontales; on regrette de ne pouvoir avoir deux 
zones différentes du même fichier (comme Ap- 
plewriter le faisait sur nos antiques / /e) [les er- 
goteurs diront qu'il suffit de charger deux fois le 
fichier en mémoire et ainsi on a deux versions 
du même source dans les deux fenêtres; mais 
cette solution n'est guère satisfaisante, car 
source de confusion: quel est le source de travail 
et celui de référence?]; 

+ les fonctions souris (déplacement et clic) sont 
redéfinissables au clavier: ra 
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NE TRES 


ss 


RTE pt 





+ possibilité de visionner un fichier sans le char- 
ger; 

+ configuration de la largeur d'édition (maxi- 
mum 256 caractères) par défilement horizontal 
de l'écran; 

+ changement de jeu de tabulations (5 maxi) ‘à 
la volée’, alors que dans MaxEd il faut aller dans 
un utilitaire spécifique de chargement/sauve- 
garde/édition; 

+ conversion à la demande des caractères ayant 
le bit 8 à 1 en caractères 7 bits lors du charge- 
ment: ainsi les fichiers TML sont listables sans 
les I-inverses remplaçant les tabulations. 

+ lorsqu'on est positionné sur une accolade ou 
une parenthèse, une fonction spéciale permet de 
trouver la parenthèse ou accolade de ferme- 
ture/ouverture associée, au même niveau hié- 
rarchique. Ceci permet de se placer très facile- 
ment en fin ou début de procédure/fonc- 
tion/formule, et ce à n'importe quel niveau 
d'emboîtement. 


Conclusion 


Ces deux éditeurs sont de puissants outils dont 
on attendait la venue avec impatience. MaxEd 
est très complet, mais du coup un peu ‘lourd’ à 
utiliser (mais une fois qu'on l'a bien en main, on 
est sidéré par sa souplesse). Edit16, quant à lui, 
est nettement plus souple au premier contact, 
mais à l'usage certaines fonctions absentes font 
cruellement défaut. 

Je conseillerais à ceux qui disposent de peu de 
mémoire ou n'emploient qu'un seul langage de 
programmation d'utiliser Edit16. Quant à ceux 
qui ont investi dans 4 mégas de RAM ou qui 
jouent aux polyglottes des compilateurs, il est 
tout naturel qu'il s'offrent MaxEd. 

Ces deux produits sont vendus à des prix tout à 
fait raisonnables, et le seul vrai reproche que 
l'on peut leur faire est qu'il ait fallu attendre si 
longtemps pour en disposer ! 


Adresses: 


MaxEd 

360 Micro System 

P.O. box 1192 

Oviedo, FP 32765, USA 


Edit16 

Simple Software System International 
4612 North Landing Drive NE 
Marietta, GA 30066,USA 
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Chic, un nouvel impôt ! 


La Contribution Sociale Généralisée 
est une innovation qui rencontre de fa- 
rouches adversaires: à savoir... les ser- 
vices payeurs des entreprises, qui doi- 
vent refaire tous leurs modèles de bul- 
letins de paye. 

Mais elle rencontre aussi de chauds 
partisans: à savoir... les développeurs, 
qui en profitent pour faire une mise à 
jour (enfin une mise à jour obligatoire!) 
de leurs logiciels de paye. 

Parmi ceux-ci, le Dr Walusinski, dont 
le logiciel MemoPaye, diffusé par 
Imagol, et tournant sur Apple II GS, 
est désormais à jour. 

MemoPaye fait la paye de 5 salariés 
maximum, tous en-dessous du plafond 
SS, même relevant de plusieurs 
conventions collectives différentes. 
MemoPaye est particulièrement adapté 
à la rémunération des pimpantes secré- 
taires et des accortes infirmières du ca- 
binet médical du Dr Walusinski et des 
cabinets médicaux français en général. 
Il s'avale tous ces calculs atroces genre 
“60% de la part patronale de la 
cotisation Urssaf, avec un abattement 
de 20% en-dessous du plafond SS dans 
la limite des 120 heures”, et en sort des 
bulletins de paie impeccables. 

Ce logiciel est en Applesoft enrichi 
MemDos, en mode texte 80 colonnes, et 
cela convient parfaitement à une paye: 
la CSG serait la même en couleurs et 
avec des icônes. 

Il est livré sur disquette 3,5, sous Mem- 
Dos, et. c'est justement ça le 
problème: 

+ d'une part, je ne sais pas comment on 
peut transporter ses données depuis 
une disquette MemDos sur une 
disquette Prodos, et nos data risquent 
d'être bloquées. 

+ d'autre part, le MemDos en question 
est un peu antique. Par exemple, si 
vous ne mettez pas votre Tableau de 
Bord en 40 colonnes avant de booter la 
disquette, ça plante désagréablement. 


Dîtes, Docteur, une version “vraiment 
LÉ= gite 
JYB 


Imagol - 72 Bd Raspail - 75006 Paris 
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« lernps cle ravail » 


Un Init à programmer soi-même 
Patrick Desnoues 


NDLR: Une innovation dans ce numéro de ToolBox-Mag. Pour vous 
aider à vous mettre à programmer le GS, nous publions un plan de 
programme. À vous d'écrire, tester, débuguer le programme lui-même. 
Guidé par notre spécialiste Patrick Desnoues, vous allez écrire votre 
premier programme en assembleur GS ! 

Notez que ce programme, qui écrit dans la Bram, est incompatible avec 
les programmes qui restaurent la Bram, comme celui de J.L. Darbon 
publié dans ToolBox-Mag 4. Cf pre 4, pages 25-26. 

Certains morceaux de source étant réutilisables pratiquement tels quels, 
nous avons mis le fichier texte correspondant à cet article dans le sous- 
catalogue /TEMPS.TRAVAIL de la disquette, pour vous éviter d'avoir à 
ressaisir. Attention cependant, le fichier est en Ascii étendu, avec des 


Tabs: vous aurez un peu de nettoyage à faire sous APW/Orca. 


“Donne un poisson à l'affamé, il mangera une 
journée. Apprends-lui à pêcher, il mangera 
toute sa vie”, dit un proverbe chinois. Qu'est-ce 
qui nous à tous poussés à nous mettre à pro- 
grammer, sinon la volonté que cette machine 
fasse exactement ce que nous voulons, nous? 
Voyant dans ToolBox Mag une suggestion de 
programme d'un lecteur, j'y ai vu une bonne oc- 
casion de répondre selon ce proverbe. 


Le but de ce programme est de comptabiliser le 
temps d'utilisation de votre ordinateur favori. 
N'oubliez pas que le maximum syndical est de 
39 heures par semaine. 

Le programme ne devant pas poser de pro- 
blème majeur, voici un plan d'organisation, 
avec des indications techniques: le tout devrait 
permettre à un utilisateur désirant commencer 
la programmation de sa machine d'y arriver 
sans trop de difficulté. 

Type de programme : seul un init permet ce 
genre de chose (voyez ToolBox-Mag 4, pages 5 à 
13). Le langage utilisé ici sera l'assembleur APW 
ou ORCA. 


Technique d'un init 


MainProgram START 
Php Sauvegarde le registre P 
Phb Sauvegarde le registre B 
Phk Le Registre B = Registre K 
PIb 
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Long m,i 


Sta Myld 
Vérification qu'on est bien sous GS/OS 5.04: 
voir le source de JYB sur la disquette ToolBox 
Mag 4. C'est indispensable, puisqu'on utilise 
l'appel ConvSecondes décrit dans ToolBox 
Mag 3. 


Registre en mode 16 Bits 


Principe du programme 

+ Sauvegarder dans un fichier sur disque, la 
date et l'heure où l'on allume le GS. 

+ Initialiser dans la Ram batterie un compteur 
qui va s'incrémenter tout le temps où le GS est 
allumé. 

+ Installer une tâche de fond qui va incrémenter 
cette valeur. 

+ Quand on rallume le GS, on va lire la valeur, 
on lui additionne la date de départ, et on va 
sauvegarder la date de fin de la dernière utili- 
sation. 

1) Si l'on vient d'allumer son GS : 

Pour savoir si le GS vient d'être allumé, lire une 

valeur en mémoire : si elle est à zéro, on vient 
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d'allumer. Changer cette valeur, pour pouvoir 
ensuite la tester, en cas de reboot. Elle ne doit 
pas être modifiée par un AutoTest… (ex : 
$01/03FF). 


Lecture du fichier de données : 


+ Le fichier existe: 
Lecture de la valeur de la ram batterie. 
Lecture de la dernière date enregistrée. 
Calcul de la date de fin d'utilisation. 
Sauvegarde de cette date. 

e le fichier n'existe pas: 
Création du fichier (_CreateGS CRparms) 
Ecrire : "Date de mise en marche / Extinc- 
tion / Durée' 


Lecture de la date du jour 
Sauvegarde de cette date 


Initialisation du compteur 
Mise en place de la routine de fond 


2) On vient de rebooter. 


Réinstallation de la tâche de fond sans initia- 
liser le compteur de la ram batterie. 


Type de fichier de données : 


Prendre un fichier de type texte que n'im- 
porte quel traitement de texte pourra consulter. 

Positionner ce fichier sur le volume de boot 
dans le dossier */System/System.Setup/ 

Ecrire la date de début : Jour / Mois / Année 
- Heure 

Mettre une tabulation 

Ecrire la date de fin: Jour / Mois / Année - 
Heure 

Mettre une tabulation 

Ecrire le nombre de minutes utilisées. 

Mettre un retour chariot (return) 


date 1 (20 caract) Tab (1) date 2 (20 caract) 
Tab (1) nombre de minutes (5) CR (1) 
soit 48 caractères par ligne. 


Comment lire le fichier : 
_OpenGS OPParms 
Bcs Erreur 


Lda Op_RefNum 
Sta CIL_NumRef 
Sta Re_NumRef 


_NewHandle (Op_Eof+48) 


_ReadGS ReParms 
Bcs Erreur 


_CloseGS ClParms 
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Lecture de la date : 


Commencer par la fin du fichier en décré- 
mentant. 

Rechercher le caractère $0D (return) 

Incrémenter la position de 1 : Date du jour 

Convertir cette date en secondes (_ConvSe- 
cond décrit dans la disquette ToolBox-Mag n°3): 

LongResult 

Pushword #1 Format Hex du MiscToolSet 

-> Secondes 

Pushlong #0 

Pushlong #DateDujour 

_ConvSecond 

PullLong DatelSecondes 


Lecture de la valeur de la BRam: 
WordResult 
Pushword #$FA 
_ReadBParam 

: Pla 


WordResult 
Pushword #$FB 
_ReadBParam 


Adec 3,5 
Sta NbMinutes 


Pix 
On multiplie le nombre de minutes par 60 
pour avoir des secondes: 

LongResult 

Pushword NbMinutes 

Pushword #60 

_Muitiply 

PullLong NbSecondes 


On additionne le nombre de secondes écou- 
lées à la date de départ en secondes: 
Add.L  DatelSecondes, NbSecondes, 
Date2Secondes 


On convertit cette nouvelle date en secondes : 
LongResult 
Pushword #0  Secondes -> Format Hex du 
MiscToolSet 
Pushlong Date2Secondes 
Pushlong #DateDuJour+21 
_ConvSecond 
PullLong 


Lecture de la date du jour : 
Pushlong #DateDuJour+48 
_ReadAsciiTime 

Sauvegarde du fichier : 


_OpenGS OPparms 
_WriteGS WRparms 
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Re PT PP ENS 


_CloseGS CLparms 
; Paramètres OpenFile 


OPParms dc.w 15 

Op_RefNum ds 2 

Op_Pathname dc.L NameToLoad 

Op_Reg_Access  dc.w 0 

Op_ResourceNum dc.w 0 : 0 : data | 1 : Fork 
_ACCESS ds 2 

Op_Filetype ds 2 

Op_AuxType ds 4 

Op_StorageType ds 2 

Op_CreateTd ds 8 

Op_ModifyTd  ds8 

Op ads ds 4 

Op_E ds 4 

Op_ BlockUsed ds 4 


Op_ResourceEof ds 4 
Op_ResourceBlo ds 4 


NameToLoad GsString ‘*/System/System.Setup/? 
: Paramètres ReadFile 


ReParms dc.w 4 
Re_NumRef ds 2 
Re_Buffer ds 4 
Re_Eof ds 4 
Re_OctTrans ds 4 


; Paramètres WriteFile 


WrParms dc.w 4 
Wr_NumRef ds 2 
Wr_Buffer ds 4 
Wr_Eof ds 4 
Wr_OctWrite ds 4 

; Paramètres CloseFile 
ClParms dc:w 1 
CI_NumRef ds 2 

; Paramètres Create 
CrParms dc.w 5 
Cr_Pathname dc.L 0 
Cr_Access dc.w AllAccess 
Cr_Type ds 2 
Cr_Auxtype ds 4 
Cr_Storage dc.w 1 


Installation de la tâche de fond: 
Page 14-50 volume 1 ToolBox Référence 


Pushlong #SaveBRam 
_SetHeartBeat 


Toutes les minutes on incrémente un compteur 


sur 2 octets qui contiendra le nombre de mi- 
nutes écoulées (en hexadécimal) depuis l'allu- 
mage du GS. 
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SaveBRam Anop 
dc.L 0 
dc.w 60*60 
dc.w $A55A 
dc.L 0 
Si on arrive ici, c'est que la minute est écoulée et 
que le compteur est à zéro. On le remet donc 
pour le prochain passage: 


Lda #60*60 
Sta SaveBRam+4 


WordResult 
Pushword #$FA 
_ReadBParam 
Pla 

Ina 

Beq NotZero 


Toutes les minutes 


Pha 

Pushword #$FA 
_WriteBParam 
RtI 


NotZero Anop 
WordResult 
Pushword #$FB 
_ReadBParam 
Pla 
Ina 
Pha 
Pushword #$FB 
_WriteBParam 
Pushword #0 
Pushword #$FA 
_WriteBParam 
Rtl 


Si l'on veut initialiser le compteur à zéro à l'allu- 
mage du GS : 


Pushword #0 
Pushword #$FB 
_WriteBParam 
Pushword #0 
Pushword #$F A 
_WriteBParam 


En résumé 


Il est nécessaire de posséder un langage de pro- 
grammation (APW / Orca / Merlin), les 3 vo- 
lumes du ToolBox Reference (Addison-Wesley), 
une documentation GS/OS (ex: Exploring 
Apple GS/0C$, par Gary Little), d'être abonné à 
ToolBox-Mag et d'avoir un peu de temps libre. 


En cas de difficulté, on peut me contacter par 
l'intermédiaire de ToolBox-Mag. Bon courage à 
tous ! & 
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Première Partie: l'enquête 
de Bernard Fournier 


Comment? Qu'est-ce? Qu'arrive-t-il? Pas de 
nouveautés dans cette rubrique ce mois-ci? Est- 
ce à dire que les programmeurs ont fait fortune 
avec leurs sharewares et sont partis sous les tro- 
piques dépenser leurs magots? Il fallait en avoir 
le coeur net, et nos plus fins limiers ont sillonné 
inlassablement les chemins de notre beau pays 
afin de se rendre compte sur place. 

Tout d'abord, direction Dijon. Dans une rue pai- 
sible, d'étranges bruits s'échappent par le vasis- 
tas d'un garage. Glissant un oeil par l'ouverture, 
notre enquêteur vit un groupe de joyeux drilles 
en effervescence autour d'un clavier et il enten- 
dit des bruits de canonnade. Bizarre, bizarre... 
Poursuivant son chemin, il s'arrête aux portes 
de Lyon traquant les programmeurs fous. Dans 
les lointaines banlieues, aux marches du Dau- 
phiné, il rencontre un gentil monsieur fort télé- 
génique qui lui montre subrepticement une 
merveille de machine à écrire. à moins que ce 
ne fût un GS... 

De plus en plus intrigué, et sur la foi d'informa- 
tions dont on taira la source, notre Rouletabille 
pousse son voyage jusqu'au bord de mer. Là, il 
se heurte à une porte close. Par un interstice de 
persienne il distingue un homme s'affairant au 
milieu de milliers de pages de listings. Un seul 
coup d'oeil suffit à notre reporter pour distin- 
guer très nettement la nature de ces pages: il 
s'agit du désassemblage d'une énorme applica- 
tion. 

Cette fois, notre limier est carrément perplexe. 
Que ce passe-t-il dans ces chaumières? Surtout 
que la rumeur informatique lui colporte un arri- 
vage important de joysticks dans une autre ré- 
gion de France. la même rumeur prétendant 
qu'ils sont destinés à une seule et même per- 
sonne, enfermée dans sa chambre depuis 3 
mois. 


Bon sûr, mais c'est bien sang! Tous ces évène- 
ments ont un lien! Si la rubrique Made In France 
est vide ce mois-ci, et si les programmeurs fous 
sont enfermés chez eux en ces belles journées 
printanières, c'est qu'ils mettent la dernière 
touche à leurs créations! Donc pas de panique: 
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Made in France: la pénurie? 


Bernard Fournier et J.Y. Bourdin 


l'été va être chaud! 


Note: tous les événements et personnages dé- 
crits dans cet article existent réellement et toute 
ressemblance avec des programmeurs GS 
connus est volontaire. Concluez vous même... 


Bernard Fournier 


Deuxième Partie: les 
déductions de J.Y. Bourdin 


Pour préciser les allusions de Bernard, je dirais 
que la pénurie actuelle de programmes fran- 
çais nouveaux en freeware ou shareware est un 
excellent signe. 

I semble bien, en effet, que les programmeurs 
GS français, entre les diverses formules de pu- 
blication et de commercialisation existant en ce 
moment en France, aient enfin trouvé le moyen 
de diffuser commercialement de façon nor- 
male leur travail. 

Quand GS Plus publie aux USA des publicités 
pour Photonix II, qu'A2 Central envoie sur toute 
la planète un catalogue vendant Space Shark et 
les autres, qu'inCider/ A+ s'y met à son tour, 
c'est que quelque chose est en train de changer 
dans le bon sens. La reconquête de l'Amérique 
serait-elle en cours? 


Vrai et faux shareware 


ToolBox-Mag lui-même, en publiant tous les 
bons programmes qu'on lui envoie, alors qu'au- 
paravant il n'existait guère d'autre issue que le 
shareware ou le freeware, fait sans doute baisser 
la production de ce “faux” shareware qui ne 
prenait ce canal qu'à défaut de débouché com- 
mercial normal. 

Le shareware se rétrécit donc peu-à-peu, en 
France, à ce qui est sa vraie fonction: celle du 
“galop d'essai” par lequel un auteur fait 
connaître ce dont il est capable. 

Mais quand les galops d'essai sont terminés, on 
commence les vraies courses. Les program- 
meurs français du GS travaillent: mais il est fort 
probable que “Made in France” doive désor- 
mais étendre son domaine aux logiciels com- 
merciaux. 


>> 
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Dépêchez-vous 


La preuve: je viens de recevoir un nouveau sha- 
reware, la version 2.2 de l'indispensable Trans- 
Prog de François Uhrich (voir les éditions pré- 
cédentes de “Made in France”). Corrections de 
quelques défauts (TransProg ne se-déclenche 
plus en haut de l'écran quand on a enlevé la 
barre des menus dans un programme de Paint, 
par exemple), meilleure gestion des menus, 
mais surtout de la mémoire (ressources et seg- 
ments dynamiques permettent de ne prendre 
que 20k en mémoire sur 50), ajout d'une option 
redémarrer au menu éteindre. 

Dans son état actuel, TransProg est un logiciel 
pratiquement “bug-free”, de niveau largement 
commercial, supérieur à On Cue sur Mac (on 
peut trier la liste de TransProgMenu). En consé- 
quence... c'est la dernière version en share- 
ware! 

La version 3.0 de TransProg est en cours de dé- 
veloppement, mais nous dit François Uhrich, 
elle « ne sera plus diffusée sous la forme d'un 
shareware, mais d'un produit commercial à part 
entière », par BrainStorm Software, des condi- 
tions particulières étant alors accordées aux ac- 
tuels acquéreurs. Après Fontasm, Photonix, Boun- 
cing Bluster, c'est le tour de TransProg. Il y a bien 
là un destin. 

Sur la même disquette, deux autres sharewares 
à essayer avant de les acheter. 

Pour l'un, le Fonte/DA Installateur 20 du 
même François Uhrich dont vous savez déjà 
que c'est un indispensable, je ne parierai pas 
une carte I Plus pour Mac à bas prix sur sa du- 
rée de vie en shareware, étant donné qu'il a les 
mêmes qualités que TransProg. Si vous ne 
l'avez pas déjà, dépêchez-vous: comme Trans- 
Prog, il risque d'être plus cher bientôt. 


Le vrai shareware 


Le second, en revanche, illustre bien la fonction 
classique du “vrai shareware”, qui est plus de 
permettre de faire savoir de quoi son auteur est 
capable, que de vendre réellement un produit. 
Vendu 40F par BrainStorm Software, ce CDev 
de Louis van Proosdij, intitulé TransWarp.Set- 
Up, permet de configurer la carte TransWarp 
GS et de forcer une configuration déterminée de 
celle-ci lors du prochain reboot. 

S'il ne faisait que reprendre les fonctions qui 
sont celles du CDA de la Rom de la TransWarp, 
ou celles du CDev en domaine public de Doug 
Macintyre appelé “TransWarp”, il ne servirait à 
rien. Maïs il fait un peu plus, essentiellement en 
permettant de régler la fonction Enable/Disable 
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DataCache de la TransWarp. 

[NB: l'auteur recommande de laisser en position 
Enable. Je ne le suivrai pas sur ce terrain: sur ma 
configuration, il m'arrive une fois sur deux de ne 
pas pouvoir booter jusqu'au bout en position 
Enable. Et dans ce cas, plus moyen de rectifier, les 
CDevs étant inaccessibles. Voyez ce qui marche le 
mieux sur votre configuration. 

Dans la mienne, certains logiciels supportent le Da- 
taCache, d'autres non. Comme tout cela se résume à 
JSL BC/FF4C (DisableDataCache) et JSL BC/FF48 
(EnableDataCache), je me débrouille avec des 
patches et de mini-fichiers lanceurs, un accessoire ne 
convient pas.] 


Ce qui prouve bien qu'il ne s'agit pas d'un pro- 
gramme à visée réellement commerciale, c'est 
que l'auteur s'est donné le mal de réécrire en 
CDev un programme qui existe déjà sous forme 
de NDA: l'excellent accessoire en freeware 
“TransWarpGS.Info”, de E. et P. Lacquehay, 
permet depuis Juillet 89 d'avoir accès aux ré- 
glages du DataCache, comme aux autres ré- 
glages de la TransWarp. 

J'ai d'ailleurs du mal à voir ce qu'apporte le fait 
de présenter les mêmes fonctionnalités en CDev 
plutôt qu'en NDA: surtout qu'une des diffé- 
rences principales entre les deux (un CDev ré- 
side sur disque, et un NDA en mémoire) est 
désormais disparue, puisque précisément, avec 
le Fonte/DA Installateur de F.Uhrich qui est sur 
la même disquette, les accessoires aussi rési- 
dent sur disque! Ceci dit, si vous n'avez pas dé- 
à “TransWarpGS.Info”, “TransWarp.Setup"” est 
également un bon choix. 

Un programme qui marche, mais qui est réservé 
aux possesseurs d'un matériel déterminé et 
“doublonne” un programme gratuit déjà exis- 
tant, ne se donne pas toutes les chances au plan 
commercial: manifestement, l'auteur a surtout 
voulu prouver qu'il sait faire un CDev, ce qui 
correspond bien à l'esprit “galop d'essai” du 
shareware. 

Après ce galop d'essai réussi, je parie que son 
auteur ne mettra pas longtemps, lui non plus, à 
entrer dans la course! 


J.Y. Bourdin 


E. et P. Lacquehay 

Pack Evolution, 

112 Ave du Gal Leclerc 
54000 Nancy 


BrainStorm Software 
7 allée Murat, Bois Impérial, 
54630 RichardMénil. 





ment à ToolBox-Mag! 


ResDoctor est le SAMU des ressources, mais il 
n'est pas que cela: c'est aussi un éditeur de res- 
sources très complet pour le GS. Le plus com- 
plet sans doute à ce jour pour le GS, capable de 
tout faire sans sortir de l'environnement Desk- 
Top. 


Conçu au départ pour combler les lacunes de 
TML Pascal II dans ce domaine, ResDoctor a 
été progressivement complété par la suite par 
plusieurs utilitaires différents qui en font un 
analyseur (désassembleur) et un éditeur-com- 
Pilateur de ressources très complets. 


ResDoctor permet de faire pratiquement tout 
ce dont vous pouvez avoir besoin à propos des 
ressources du GS. Entre autres: 


* contrôler, ressource par ressource, tous les 
éléments des ressources appartenant aux types 
standard connues à ce jour. 

ResDoctor reconnaît de nombreuses ressources 
standard récemment définies, comme celles des 
formats de TextEdit, encore inconnues de beau- 
coup. 

L'accès direct à chaque ressource est très prati- 
que. Chaque ressource analysée comporte tous 
les renseignements utiles. Non seulement ses 
propres paramètres, mais, en clair, les titres et 
chaînes de caractères auxquels elle se réfère. 


+ éditer, recopier, modifier, supprimer, créer 
individuellement les ressources; cela qu'elles 
soient de type standard ou non. 


+ transformer les ressources de tout fichier de 
type étendu en un listing désassemblé très 
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Un logiciel ToolBox-Mag : 


ReSDOCIOor 


par Jean Destelle 


[NDLR. Nouveauté dans ce numéro: un logiciel complet, avec sa documentation mais 
sans le source, ResDoctor. Regardez la longueur du code-objet: il était bien impossible 
de mettre le source. ResDoctor, à lui seul, vaut à notre avis le prix d'un abonne- 


Qu'est-ce que ResDoctor? Eh bien, c'est le remplaçant du couple infernal Rez/Derez. 
Tout ce que vous ne pouvez pas faire avec Genesys, vous pourrez désormais le faire avec 
ResDoctor. ResDoctor est un compilateur-décompilateur de ressources complet. 
À sa façon, ResDoctor est même un éditeur de ressources: vous pouvez lui faire rem- 
placer Genesys pour éditer toutes les ressources, simplement il faudra le faire “à la 
main". En fait, si vous avez TML Pascal II et ResDoctor, vous avez un équipement 
complet pour programmer le GS. Vous pourrez écrire une application complète comme 
Sélect. La documentation complète est incluse dans les fichiers d'aide sur le disque.] 


clair: c'est sa fonction analyseur. 


+ imprimer des analyses soit par ressource, soit 
par type, soit par famille de ressources (celles 
qui sont reliées par une interdépendance), soit 
pour un fichier entier. 


+ visualiser les fenêtres avec tous leurs 
contrôles, afin d'en corriger l'édition immédiate- 
ment, ainsi que les fenêtres d'alerte, avec leur 
présentation définitive. 


ResDoctor comporte deux éditeurs: un éditeur 
simple fonctionnant ressource par ressource, 
très rapide d'emploi, incorporant son propre 
compilateur, et un Grand éditeur, destiné 
d'abord à transformer tout fichier ressource 
existant en un fichier source complet immédia- 
tement imprimable, puis à éditer et à compiler 
ce fichier source, avec toutes les possibilités ha- 
bituelles de TextEdit: édition pleine page, utili- 
sation du copier-coller, etc. 


On a particulièrement soigné la clarté des 
sources et analyses produits par ResDoctor: il 
est facile d'y entreprendre toute vérification 
utile. 

Tous les noms de paramètres de la ToolBox sont 
respectés. La disposition adoptée respecte les 
habitudes des programmeurs de tous langages. 
C'est une application en mode “desktop”, dont 
l'emploi est tout-à-fait intuitif. 


Le logiciel comporte aussi plusieurs moyens dif- 
férents de recopie de fichiers comportant des 
ressources, permettant de transférer des ‘"res- 
forks" complètes ou des ressources indivi- > 
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duelles d'un fichier à un autre. 


Il permet également de transformer en res- 
source la totalité de la data-fork de tout fichier 
(ou bien, ce qui revient au même, un fichier en- 
tier de l'ancien type). On transforme par 
exemple tout fichier texte en une ressource-texte 
en un tournemain. 


La programmation du GS, quel que soit le lan- 
gage utilisé, fait maintenant forcément appel 
aux ressources, qui représentent une très forte 
proportion du programme total. Souvent des er- 
reurs, des accidents se produisent dans leur ma- 
nipulation. ResDoctor permet, très rapidement, 
et avec la plus grande sécurité pour les fichiers 
et les programmes, de retrouver l'erreur et de la 
corriger. 


ResDoctor reconnaît tous les types standard de 
ressources actuellement définis et permet d'en 
ajouter de nouveaux, qui pourront à leur tour, 
dans la plupart des cas, devenir analysables. 
ResDoctor est en effet une application ouverte, 
grâce à l'usage. des ressources, bien sûr! 


Conçu pour réparer des erreurs, il a été testé de 
façon sévère, et plusieurs erreurs de principe 
dans la définition des ressources soit par TML 
Pascal Il, soit par la documentation officielle ont 
été corrigées. 


C'est un logiciel français, écrit en TML Pascal II 
par un programmeur de GS pour des program- 
meurs de GS. Bien que conçu plutôt au début 
pour le Pascal, il est absolument indépendant de 
tout langage de programmation. 

Il privilégie avant tout la sécurité d'emploi. Ex- 
périmenté depuis plus de 8 mois, il s'est avéré 
un outil extrêmement sûr, auquel on peut 
confier ses fichiers sans crainte. 


Enfin ResDoctor est une solution économique 
pour règler le problème des ressources. Car il se 
suffit à lui-même et comporte toutes les fonc- 
tions de traitement de fichiers, de désassem- 
blage, de listage, d'édition et de compilation. 
Pour l'utilisateur de TML Pascal IL, c'est la solu- 
tion idéale. Il pourra créer rapidement les pre- 
mières ressources de son application avec l'édi- 
teur graphique de TML, qui est ultra-rapide, 
puis par la suite, faire tous les contrôles, les mo- 
difications et les adjonctions avec ResDoctor, 
avec une extrême facilité. 


La notice très complète, intégrée et accessible 
directement à chaque instant, explique non seu- 
lement le fonctionnement du logiciel avec beau- 
coup de détails et d'exemples, mais aussi com- 
ment les ressources sont utilisées par le GS. 


Dans le sous-catalogue /Select du disque conte- 
nant le sélecteur Sélect, vous trouverez des 
sources de ressources, établis par ResDoctor, 
qui sont utilisées dans ce programme. E 
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Les types de ressources 
connus de ResDoctor 


Le tableau ci-dessous indique les types stan- Ë 
dard actuellement documentés par Apple. 
Pour certains types, le format n'a pas encore 
été publié. 

La mention "analysable" signifie que Res-£ 
Doctor reconnaît ce type, et en produit auto- Ë 
matiquement l'analyse au moment du désas- Æ 
semblage de la ressource. 





Type Nom de la ressource ResDoctor 
$8001  rlcon analysable 
$8002  rPicture analysable 
$8003 rControlList analysable 
$8004 rControl Template  analysable 
$8005 rCllnputString analysable 
58006  rPString analysable 
$8007  rStringList analysable 
$8008 rMenuBar analysable 
$8009 rMenu analysable 
$800A rMenultem analysable 
$800B rTextForLETextBox2 analysable 
$800C rControlDefProc analysable 
$800D rCtiColorTbl analysable 
$800E rWindowparam analysable 
$800F rWindParam2 non analysable À 
$8010 rWindColor analysable 
$8011 rTextBlock analysable 
$8012  rStyleBlock analysable 
$8013 rToolStartup analysable 
$8014 rResName non analysable À 
$8015 rAlertString analysable 
$8016 rText analysable À 
$8017 rCodeResource non analysable À 
$8018 rCDEVCode non analysable | 
$8019 rcDEVFlags non analysable 
$801A rTwoRects analysable | 
$801C rListRef analysable 
$801D rCString analysable 
$8023 rClOuputString analysable 
$8024 rSoundSample analysable 
$8025 rTERuler analysable 
$8027 rCursor analysable. 





Le ©S pour débutants 


deuxième partie : 


dnadtiornie clu 5.04! 


Eric Weyland 


Nous parlerons aujourd'hui de l'architecture du 
système d'exploitation de l'Apple II GS, GS/0S 
5.0.4. Je fais référence ici à la dernière version 
du système français: la terminologie exacte est 
« disque système 5.04 avec GS/OS 3.03 ». 


Un disque système fonctionnel 


Un avertissement tout de suite: en raison d'un 
bug découvert à la dernière minute, et signalé 
dans le catalogue /DERNIERE.HEURE de la dis- 
quette ToolBox-Mag 4, la version effectivement 
distribuée du système 5.04 français ne corres- 
pond pas à la description qu'en donnait J.Y. 
Bourdin dans ToolBox-Mag 4. Le 5.04 français 
est livré en deux disquettes, et la première dis- 
quette (appelée /DisqueSysteme) n'est pas 
pleinement fonctionnelle (elle ne contient pas 
FRinit, et a un Sys.Resources non francisé: il 
s'agit de permettre le fonctionnement de l'Instal- 
leur si vous n'avez qu'un seul lecteur de dis- 
quettes). 

La première chose à faire est donc de vous cons- 
tituer un disque système fonctionnel. Voici 
comment (si vous ne comprenez pas ce qui suit 
ou n'arrivez pas à le faire, lisez d'abord le pas- 
sage intitulé “un environnement hiérarchisé” un 
peu plus loin dans cet article): 

@ Faîtes une copie de la disquette appelée /Dis- 
que.Systeme.  Renommez cette disquette 
[MonSysteme. Passez dans le sous-catalogue 
/Mon.Systeme/System/System.Setup. Détruisez le 
fichier appelé Sys.Resources. Si vous avez un GS 
Roms 01, détruisez les fichiers TS3 et PS3. Si 
vous avez un GS Roms 03, détruisez les fichiers 
TS2 et PS2. (Voyez mon premier article dans 
ToolBox-Mag 4 pour savoir quelles sont les 
Roms de votre GS). 

@ Copiez, depuis la disquette /Utilitaires, les fi- 
chiers  /Utilitaires/System/System.Setup/Sys.Re- 
sources.K et [Utilitaires/System/System.Se- 
tup/Frinit504 dans le catalogue /Mon.Syste- 
me/System/System.Setup. Renommez ces fichiers 
une fois copiés en Sys.Resources et Frinit. Co- 
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piez également le fichier 
tem/Tools/Tool029 dans  /Mon.Systeme/Sys- 
tem/Tools. Copiez enfin le fichier /Utili- 
taires/System/Drivers/Appledisk.5.25 dans 
ÎMon.Systeme|System/Drivers. 

Vous avez maintenant une disquette système 
fonctionnelle. C'est cette disquette que nous al- 
lons analyser. Mais nous allons aussi voir com- 
ment la modifier: de même qu'il fallait, avant de 
démarrer le GS, le configurer pour que ce soit 
votre GS, il faudra de même configurer le systè- 
me pour que ce soit votre système (en fait, en 
détruisant ces fichiers TS2 ou TS3, nous avons 
déjà commencé à personnaliser le système...). 


Au-delà du Finder 


Prenez votre disquette /Mon.Systeme et bootez 
la. Assurez-vous de la version de votre système 
en appuyant sur une touche avant l'apparition 
du thermomètre. Au bout de quelques se- 
condes, vous devez être sous le Finder. 

Le Finder ne fait pas réellement partie du sys- 
tème GS/OS: c'est une application, fournie par 
Apple, qui utilise le système. Cette application a 
deux fonctions: lancer des programmes, d'une 
part, gérer les disques d'autre part (c'est-à-dire 
effectuer un certain nombre de travaux utili- 
taires comme formater une disquette, faire des 
copies de fichiers, de disquettes, afficher le 
contenu d'un catalogue, etc). 

Ce Finder existe aussi sur Macintosh, où il fonc- 
tionne de la même façon. Le Finder est un pro- 
gramme en mode “desktop”. Cela signifie qu'il 
utilise menus déroulants, souris, fenêtres, clics 
et double clics de la souris, boîtes de dialogue, 
etc. Mon propos n'est pas de décrire le fonction- 
nement du Finder: la documentation Apple 
(celle du système 5.02, le Finder restant le même 
dans le 5.04) est là pour cela, et l'Apple II Ser- 
vice Team d'Apple France se fait un plaisir de 
répondre à vos questions à ce sujet. 

Le Finder est une application bien ajustée aux 
réticences des débutants, non parce qu'il bp 


[Utilitaires/Sys- 
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serait “facile” (les métaphores du Finder sur le 
“bureau”, les “dossiers”, etc, sont tout sauf évi- 
dentes), mais parce qu'il utilise au maximum 
des petites images (icônes) au lieu des mots, et 
que cela, particulièrement sur le GS avec la cou- 
leur, a un aspect séducteur et attirant. 

Ces images peuvent symboliser à peu près n'im- 
porte quoi: sous-catalogues (représentés comme 
des “dossiers”), lecteurs de disquettes, disque 
dur, RAM Disques, programmes, fichiers, acces- 
soires de bureau, etc. Travailler avec le Finder 
consiste à ouvrir et fermer des “fenêtres”, ouvrir 
et fermer des “dossiers”, faire glisser des 
images, faire des clics et des doubles-clics. 

Mais les inconvénients du Finder sont rédhibi- 
toires: d'une part, le Finder, qui date de l'épo- 
que du Macintosh 128k, est bien adapté à la ma- 
nipulation des disquettes 3,5, mais pas à la ges- 
tion des gros volumes disques d'aujourd'hui. Il 
ne sait pas, par exemple, présenter l'arbores- 
cence d'un volume (voir ci-dessous), si bien que 
gérer un ou plusieurs disques durs avec le Fin- 
der est un travail de forçat. 

D'autre part, les petites images du Finder cons- 
tituent un masque, un filtre déformant, qui em- 
pêche de savoir ce qu'on fait, et fait commettre 
des erreurs. 

Par exemple, sous l'opération apparemment 
unique qui consiste à faire glisser l'icône d'un fi- 
chier, le Finder confond trois opérations fort 
différentes: le déplacement d'un fichier dans 
l'arborescence d'un volume (qui se contente de 
déplacer les pointeurs du fichier dans le catalo- 
gue), la copie d'un fichier (d'un volume à un 
autre par exemple, qui fait un double du fi- 
chier), et (si jamais vous faîtes glisser l'image du 
fichier sur une partie de votre écran qui ne 
contient pas de “fenêtre” de disque), une troi- 
sième opération, interne au Finder, qui ne fait 
rien du tout sur le fichier! 

Du coup, il est obligé d'introduire des distinc- 
tions artificielles et arbitraires (pour copier un 
fichier d'une branche à l'autre d'un même vo- 
lume, il faut appuyer sur Option en faisant glis- 
ser l'image du fichier, alors que c'est strictement 
la même opération que la copie sur un autre vo- 
lume): bref, au bout, on ne comprend plus rien. 
Même si le Finder a fait la fortune des conces- 
sionnaires Apple en entretenant la confusion 
chez les utilisateurs, il faut absolument sortir de 
ses métaphores et de ses petites images, de son 
univers artificiel, pour comprendre ce qui se 
passe réellement sur nos disques. Je parlerai 
donc ici de catalogues et sous-catalogues, et non 
de dossiers, de fichiers à copier et à déplacer, et 
non d'icônes à faire glisser, etc. 
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Qu'on me comprenne bien: je ne vous demande 
pas de cesser d'utiliser le Finder. C'est une des 
applications du GS, qui a au moins un mérite, 
celui d'être livrée avec le système, pour le même 
prix. Ce que je refuse, c'est l'assimilation du Fin- 
der à un composant du système, alors que ce 
n'est qu'une application, dont l'usage est totale- 
ment facultatif. Pour comprendre le système, il 
faut oublier l'interprétation déformante qu'en 
donne le Finder. 


Un environnement hiérarchisé 


Le système GS/OS (contrairement par exemple 
au fichier System du Macintosh, qui inclut 
fontes et accessoires) n'est pas un unique fichier, 
c'est un environnement hiérarchisé et ordonné, 
avec des sous-catalogues spécialisés contenant 
chacun un certain type de modules spécifiques. 
C'est qu'un système d'ordinateur moderne ne 
doit pas être conçu comme un programme, qui 
devrait être chargé en mémoire au lancement de 
la machine: c'est un ensemble de ressources, 
qui doivent être disponibles en permanence 
pour les applications, mais qui ne doivent être 
utilisées qu'en fonction des besoins et des di- 
verses configurations. 

La disquette que vous venez de booter s'appelle 
{Mon.Systeme; elle contient un système d'exploi- 
tation de base permettant de faire le strict mini- 
mum. En clair, le système d'exploitation ren- 
ferme des programmes et des données indis- 
pensables à l'Apple II GS pour faire fonctionner 
les programmes d'application (par exemple 
AppleWorks GS, HyperCard GS, ou le Finder). 
Le système d'exploitation gère les divers péri- 
phériques: écran, clavier, lecteurs de disquettes, 
disque dur, disque virtuel, imprimante, etc. 
Comme cette configuration varie selon les utili- 
sateurs, c'est à vous de vous constituer votre 
propre système en le personnalisant pour la 
configuration que vous possédez. 

Le but de cet article est précisément de vous 
permettre de comprendre la fonction et la place 
de chacun des composants du système du GS, 
de façon que vous puissiez faire votre système, 
adapté à votre configuration. 


Voici l'architecture générale de la disquette 
1Mon.Systeme: 


> Fonts 
> CDevs 


> Icons 





Vous avez sous les yeux une arborescence main- 
tenant classique (cette architecture est commune 
à toutes les versions de GS/OS). Le Finder étant 
ce qu'il est, il n'est pas possible de visualiser cet 
arbre avec lui; c'est là une des grande limitation 
du Finder (y compris sur Macintosh). Dès que 
vous voudrez travailler avec votre GS, il faudra 
vous doter d'utilitaires sérieux; ProSel 16 est à 
ce titre un excellent investissement. 


Chaque branche de l'arborescence s'appelle un 
catalogue quand elle se rattache au tronc (le ca- 
talogue principal), et un sous-catalogue quand 
elle se rattache à une autre branche (le Finder 
traduit cela par les mots “dossier” ou “folder‘”). 
Il arrive également qu'on parle de sous-catalo- 
gue dès les premières branches, pour les distin- 
guer du tronc: l'essentiel est de voir la distinc- 
tion entre le tronc et les branches. 

Ainsi, on dira qu'/lcons est un catalogue de 
{Mon.Systeme, qui est le catalogue principal du 
volume, et que /Desk.Accs est un sous-catalogue 
du catalogue /System du volume /Mon.Systeme. 
Un volume peut physiquement être une dis- 
quette, un disque dur, une partition d'un disque 
dur, un RAM Disque, etc. 

Un catalogue ou un sous-catalogue peut lui- 
même contenir un ou plusieurs sous-catalogues. 
C'est le cas de /System, catalogue du catalogue 
principal; ce catalogue /System renferme plu- 
sieurs sous-catalogues: / System.Setup, 
/Desk.Accs, Drivers, /Fsts, /Tools, JFonts et 
ICDevs. 

Il est très facile de désigner un sous-catalogue 
particulier: il suffit de connaître et d'indiquer 
son “chemin d'accès”. Pour désigner le sous-ca- 
talogue /Tools, on écrira /Mon.Systeme/Sys- 
tem/Tools; chaque catalogue ou sous-catalogue 
est dans cette notation précédée du signe / (on 
peut aussi utiliser le signe :, mais Prodos 8 ne 
reconnaît que /). 

Lorsque l'on veut sauvegarder un fichier de da- 
ta, la commande de sauvegarde a toujours be- 
soin de connaître le chemin d'accès du sous- 
catalogue où vous souhaitez sauvegarder votre 
fichier. Dans les applications en mode desktop, 
une boîte de dialogue vous demande de vous 
placer dans le sous-catalogue désiré (c'est à dire 
dans la branche de l'arborescence qui vous inté- 
resse); ce système est toujours le même car c'est 
un des outils du GS qui s'en occupe: le Standard 
File. 

La fonction de créer une branche dans l'arbores- 
cence s'appelle créer un sous-catalogue (pour le 
Finder, cela s'appelle “Créer un nouveau dos- 
sier”). 
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Les constituants du système 


Passons maintenant en revue les différents cons- 
tituants d'un système de base (le disque 
{Mon.Systeme 5.04 français). Pour cela nous pro- 
céderons sous-catalogue par sous-catalogue, car 
le système du GS (à la différence de celui du 
Macintosh, par exemple, où le catalogue /Sys- 
teme est un dépotoir universel) range ses com- 
posants chacun à sa place, de façon que nous 
puissions gérer proprement notre système. 


Catalogue principal 


Dans le catalogue principal, le fichier Prodos est 
responsable du chargement de tout le système 
GS/OS. Ce nom de Prodos ne doit pas vous 
faire croire qu'il s'agit ici du système d'exploita- 
tion Prodos 8 ou Prodos 16 (P16 est maintenant 
obsolète). En effet, le premier bloc des disques 
initialisés sous Prodos (responsable du charge- 
ment des disquettes et disques de l'Apple II GS) 
est écrit de manière à exécuter un fichier Prodos 
se trouvant dans le catalogue principal d'une 
disquette ou d'un disque. Si votre disque est ini- 
tialisé, mais ne contient pas de fichier ayant 
pour nom Prodos, le message “Unable to load 
Prodos” s'affichera. 

(Rappel: si un volume quelconque, /Ram5 par 
exemple, est catalogable et est muni d'un fichier 
Prodos, mais refuse de démarrer (booter), c'est 
parce que le premier bloc est vide: initialisez le 
disque avant de copier des fichiers dessus]. 

Le fichier Prodos peut faire a priori ce que l'on 
désire. Ainsi, sur les disquettes ToolBox-Mag, il 
y à un fichier Prodos. C'est bien entendu un 
pseudo-Prodos. Celui-ci se contente de faire un 
reboot sur la disquette, ce qui provoque le char- 
gement de la superbe animation qui s'y trouve... 
Le fichier Prodos des disquettes GS/OS est un 
chargeur (un loader) de tous les autres fichiers 
qui constituent le système, c'est lui qui lance 
tout le reste. 


C'est aussi dans le catalogue principal que l'on 
trouve  Basic.System et Basic.Launcher.  Ba- 
sic.System est le module qui permet d'utiliser 
des commandes Prodos 8 (Catalog, Open, 
Flush..) dans des programmes Basic Applesoft. 
Si vous n'utilisez pas de programmes Basic, 
vous pouvez effacer Basic.System. 

Basic.Launcher permet de lancer des pro- 
grammes Basic à partir du Finder. Là aussi, si 
vous n'utilisez pas de programmes en Basic Ap- 
pleSoft, vous pouvez l'éliminer. 


Catalogue /System 


C'est dans le catalogue /System que l'on va 


D 
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trouver un véritable Prodos. Il s'agit de Prodos 
8, l'ancien système de l'Apple II 8 bits, que l'on 
trouve sous le nom de P8. Une manipulation 
classique consiste à faire booter une disquette 
en Prodos 8, afin de lancer Basic.System. Pour 
cela initialisez une disquette et copiez dans le 
catalogue principal (pour le moment, il ne peut 
pas y en avoir d'autre) les fichiers P8 et Ba- 
sic.System; renommez P8 en Prodos. C'est tout: 
si vous bootez cette disquette, Prodos sera trou- 
vé et exécuté; à son tour, celui-ci exécutera le 
premier programme XSYSTEM (ici Basic.SYS- 
TEM) qu'il trouvera. En tapant la commande 
“BYE”, vous pourrez quitter le Basic; vous au- 
rez alors sur l'écran ce qu'Apple a mis près de 
huit ans à mettre au point (ne ratez pas cette 
merveille: faîtes cette manipulation). 

Si vous n'utilisez que des programmes 16 bits 
en mode natif, vous pouvez effacer le fichier 
P8 de votre disquette système; le système Pro- 
Dos 8 n'est alors pas nécessaire. 


Dans ce catalogue /System, vous trouverez sur- 
tout les principaux constituants du système 
d'exploitation GS/OS: Start.GS.OS, GS.OS, 
Error.Msg, GS.OS.Dev et ExpressLoad. Ces fi- 
chiers sont vitaux à la bonne marche du sys- 
tème; il est hors de question de les supprimer. 
Le fichier ayant pour nom Start est ici le Finder. 
En effet, sur un volume GS/O5, après le charge- 
ment du système, c'est le programme Start du 
sous-catalogue /System qui est exécuté. Ce pro- 
gramme Start peut être le Finder ou tout autre 
programme (par exemple ProSel 16 ou Select, le 
sélecteur de ce numéro). S'il n'y pas de fichier 
Start, le système recherche alors dans le catalo- 
gue principal du volume de boot le premier 
programme de type 516 se terminant par SYSlé, 
ou le premier programme de type SYS se termi- 
nant par SYSTEM. 


Changer de Start 


A titre d'exercice, vous allez modifier votre dis- 
quette système pour que Sélect remplace le Fin- 
der: après tout on peut très bien s'en passer. Il 
est obligatoire de travailler sur une copie de 
votre système original: copiez la disquette 
[Mon.Systeme et renommez la /TP.1. 

Nous allons maintenant faire un peu de place 
sur la disquette /TP.1: 

Dans le catalogue principal de /TP.1, effacez les 
fichiers Basic.System et Basic.Launcher. Dans le 
catalogue /TP.1/System, effacez le fichier P8, le 
sous-catalogue /Desk.Accs, et le sous-catalogue 
/CDevs, ainsi que les fichiers contenus dans ces 
sous-catalogues. Dans le catalogue 
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ÎTP.1/System/System.Setup, effacez le fichier 
Cdev.Init. 

[Nous ne faisons ces suppressions que pour gagner 
de la place sur une disquette 800k: si vous faîtes ces 
manipulations sur votre disque dur, ne détruisez 
rien]. 

Nous avons maintenant la place pour copier 
Sélect sur la disquette /TP.1. Copiez le fichier 
SelectSys de la disquette ToolBox-Mag sur la 
disquette /TP.1 dans le catalogue /System. Re- 
nommez ensuite le fichier Start (le Finder) de la 
disquette /TP.1 en Finder, renommez SelectSys 
en Start et bootez la disquette /TP.1. 

Sélect est maintenant le programme de démar- 
rage. 

Les lecteurs courageux peuvent ranger le pro- 
gramme Finder à un autre endroit que le catalo- 
gue /System où il n'a rien à faire. Il est bien en- 
tendu possible de placer le nom du Finder sur 
l'écran de votre nouveau sélecteur, afin de pour- 
voir lancer le Finder à partir de Sélect. 

Pour utiliser le Finder, il est important de ne pas 
détruire le catalogue /Icons du catalogue princi- 
pal. Pensez aussi à appliquer au Finder le patch 
publié dans ToolBox-Mag N°2, page 41 (le Fin- 
der du 5.04 est le même que celui du 5.02), ou 
bien utilisez la version 2.2 du TransProg de 
F.Uhrich pour quitter proprement le Finder. 
Enfin, le Finder a une fâcheuse tendance à pol- 
luer nos disques en posant des Finder.Data un 
peu partout. Ce n'est pas grave, mais c'est sale. 
La disquette ToolBox-Mag 4 vous a fourni un 
petit programme dépolluant d'Yvan Kœænig. 
Utilisez ce programme quand il est trop tard, 
mais songez surtout à “apprendre le caniveau” 
au Finder: cochez l'option “ne pas polluer les 
disques” dans le menu Préférences du Finder. 
Ceci fait, ne détruisez pas le fichier Finder.Root 
qui sera dans le catalogue principal de votre 
disque système (c'est lui qui dit au Finder de ne 
pas polluer). Je vous en remercie d'avance! 


/System/System.Setup: les Inits 


Examinons maintenant les différents sous-cata- 
logues du catalogue /System du volume 
/Mon.Systeme. 


Dans le sous-catalogue /System.Setup, vous 
trouverez un certain nombre de modules de 
configuration que l'on appelle des Inits. Le sys- 
tème les utilise pour remédier à certains bugs de 
la rom. Ainsi, les fichiers Tool.Setup, TS2 et 
TS3 apportent ce type de modifications. Le fi- 
chier TS2 n'est utile qu'aux personnes possé- 
dant un Apple II GS Rom 01; TS3 à ceux d'entre 
vous qui possèdent un Apple II GS Rom 03: $ 
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lon l'Apple II GS, Tool.setup va charger TS2 ou 
TS3; vous pouvez donc effacer l'un des deux fi- 
chiers, et vous l'avez fait pour faire la disquette 
1Mon.Systeme. Il est intéressant de constater que 
la taille du fichier TS3 est nettement moins im- 
portante que celle de TS2; entre les deux, la 
Rom de l'Apple II GS a été mise à jour, et ren- 
ferme donc moins de bugs... 

Il existe deux sortes d'Inits: les fichiers d'initiali- 
sation temporaire (TIF) et les fichiers d'initialisa- 
tion permanente (PIF): voyez notre dossier dans 
ToolBox-Mag 4 à ce sujet. 

C'est aussi dans /System.Setup que se trouvent 
Sys.Resources (type OS), et FRinit. C'est seule- 
ment si vous avez mis ces deux fichiers de la 
disquette /Utilitaires à la place de ceux de la dis- 
quette /Disque.Systeme que vous avez un véri- 
table 5.04 français entièrement fonctionnel, avec 
la reconfiguration du clavier dite “configuration 
Kænig” (voir ToolBox-Mag 3, page 16). 
Attention, le fichier /Sys.Resources est protégé 
par le système. Cela signifie qu'il ne peut pas 
être détruit sur votre volume de boot, car il est 
en permanence ouvert. Pour pouvoir le détruire 
et le remplacer, il faut lancer un système et aller 
faire cette manipulation en dehors du volume 
de boot. Il est d'ailleurs conseillé de faire tous 
les travaux utilitaires (optimisation, réorganisa- 
tion des fichiers...) à partir d'un système qui 
n'est pas sur le volume sur lequel on veut faire 
ces travaux. 

Dans le même sous-catalogue, le module Re- 
source.Mgr est responsable de tout ce qui est 
ressources: il ne faut pas le supprimer. 

Le module CDev.lnit est utilisé en conjonction 
avec le tableau de bord graphique; si vous avez 
effacé ce NDA vous pouvez aussi supprimer ce 
module, ainsi que le sous-catalogue 
{System/CDevs et les fichiers qu'il contient. 
Panel.Setup est le module qui met en français le 
tableau de bord CDA (celui que nous avons étu- 
dié dans le numéro précédent). Selon la version 
de la rom de votre Apple IIGS, Panel.Setup 
charge PS2 ou PS3; là aussi, vous avez déjà dû 
supprimer l'un de ces deux fichiers pour faire la 
disquette /Mon.Systeme. Panel.Setup peut être 
désactivé comme toutes les Inits et tous les ac- 
cessoires: c'est indispensable si vous utilisez 
l'excellent SoftSwitch, de R. Wagner. 


Il est très facile d'installer un fichier Init (TIF ou 
PIF): il suffit de le copier dans le sous-catalogue 
ISystem.Setup de votre système. C'est par 
exemple le cas des inits TIF NICE.PATTERN, 
NICE.SCREEN et TOOLSTORAM que vous trou- 
verez sur la disquette de ToolBox-Mag 4. A titre 
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indicatif, il est utile de savoir que le programme 
TDM (The Desktop Manager) s'installe de cette 
façon, même si on y accède à partir du menu 
des accessoires de bureau (CDA). La dernière 
version (2.2) de l'indispensable TransProg (pro- 
gramme en shareware de François Uhrich) est 
aussi une Init à laquelle on accède à tout mo- 
ment en déroulant un menu à droite sur la barre 
des menus des programmes en mode desktop. 
Divers utilitaires permettent d'activer ou de 
désactiver une init. Le Finder permet de faire 
cela dans une des options de la commande Lire 
les Informations”. Lors du prochain chargement 
de GS/OS, selon ce que vous aurez choisi, l'init 
ou les inits seront ou ne seront pas exécutées. 


/System/Desk.Accs et 
/System/Cdevs: les accessoires 


Dans le sous-catalogue /Desk.Accs, on trouve les 
accessoires de bureau. Il existe deux types d'ac- 
cessoires de bureau: les CDA (Classic Desk Ac- 
cessories) et les NDA (New Desk Accessories). 
Les CDA sont accessibles à tout moment en ta- 
pant au clavier G - Control - Esc. Un menu ap- 
paraît (c'est là que se trouve le Control Panel qui 
est un CDA particulier puisqu'il se trouve en 
Rom): il contient tous les CDA se trouvant en 
mémoire que vous pouvez utiliser. Il s'agit en 
général de calepins, de calculatrices, d'utilitaires 
de macro-commandes (Macromate), ou d'utili- 
taires divers (The Desktop Manager): mais cela 
peut être aussi un super-jeu du FTA! 

Pour installer un CDA dans ce menu, il existe 
deux solutions. La première, la moins économi- 
que en mémoire et la moins pratique car elle 
oblige à un reboot, (les accessoires de bureau 
sont résidents en mémoire) consiste à copier les 
CDA que vous désirez avoir sous la main dans 
le sous-catalogue /Desk.Accs de votre système, 
puis de rebooter tout le système pour les char- 
ger et les installer dans le menu. Vous pouvez 
par exemple copier le CDA “Beyond.CDA” de 
la disquette ToolBox-Mag 4 dans votre système 
afin de pouvoir y jouer à tout moment. 

Vous pouvez aussi utiliser un accessoire de bu- 
reau permettant d'ajouter en mémoire des CDA 
et des NDA, puis de les retirer quand vous le ju- 
gerez utile. Cet accessoire de bureau existe, il 
s'appelle “Fonte/DA Installateur”, c'est un logi- 
ciel en shareware de François Uhrich. C'est en 
fait le seul accessoire qui doive être obligatoire- 
ment présent (et activé) dans votre système. Si 
vous avez le Font/DA Installateur en mémoire, 
vous pouvez désactiver tous les autres acces- 
soires (sauf le NDA Control Panel) et les mettre 
où vous voulez, même en-dehors du cata- >> 


ToolBox Mag n° 6 





logue /System. Vous les chargerez avec le 
Fonte/DA Installateur. 

“Fonte DA Installateur” est un NDA. On in- 
stalle les NDA de façon similaire aux CDA, la 
différence réside dans la manière d'y accéder. 
En effet, les NDA sont seulement accessibles par 
le menu G des applications en mode desktop. Il 
suffit de dérouler ce menu et d'y choisir le NDA 
que vous désirez utiliser. Dans un numéro pré- 
cédent de ToolBox-Mag, l'accessoire “Traceur” 
était de type NDA. Si vous risquez d'ouvrir plu- 
sieurs NDA en même temps sur votre écran, in- 
stallez le NDA Lynx de P.Desnoues. 

Dans le système que vous possédez, il existe un 
accessoire CtlPanel.Nda qui est un tableau de 
bord graphique: comme c'est un NDA, on y ac- 
cède par le menu G en choisissant Tableau de 
bord. Cet accessoire travaille avec les fichiers 
CDev (Control Panel Devices) du sous-catalo- 
gue /CDevs; c'est dans le fichier Cdev.Data de ce 
catalogue que seront rangés les divers para- 
mètres de réglage de votre GS. 

Ce nouveau tableau de bord reprend les ré- 
glages que vous avez déjà effectués à l'aide du 
Control Panel. Le NDA se manipule à la souris, 
il est graphique et utilise de nombreuses 
icônes... mais n'apporte pas grand chose de 
nouveau: il est possible d'y configurer la taille 
de la mémoire tampon utilisée pas GS/OS, ce 
qui est, c'est vrai, un point important, et c'est 
par lui qu'il faut désormais passer pour choisir 
votre imprimante si vous en avez plusieurs. 
Chaque élément (représenté par une icône) de 
ce tableau de bord est associé à un fichier CDev; 
on peut donc y placer autant d'éléments que 
l'on veut. Il existe une multitude de CDevs per- 
mettant de configurer divers périphériques 
(carte MIDI, TransWarp) ou d'ajouter un peu de 
fantaisie au système (extincteur d'écran, charge- 
ment musical, beep d'erreur personnalisé.….). 
Ces CDevs se placent dans le sous-catalogue 
{System/CDevs. L'installation d'un Cdev ne pose 
pas de problème; il suffit de le copier dans ce 
sous-catalogue. 


/System/Drivers: 
votre configuration 


Le sous-catalogue /Drivers contient un certain 
nombre de gestionnaires de périphériques dé- 
pendant de la configuration dont vous disposez. 
En règle générale, à chaque fois que l'on ajoute 
un périphérique à l'Apple II GS (lecteur de dis- 
quettes, modem, imprimante, carte MIDI), il 
faut ajouter, c'est à dire copier un driver dans le 
sous-catalogue /Drivers de votre volume sys- 
tème. Ainsi, si vous voulez faire reconnaître au 
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système un lecteur 5,25", après la configuration 
au tableau de bord (voir numéro précédent), il 
faut recopier sur votre volume système, dans le 
sous-catalogue /Drivers le driver AppleDisk5.25. 
C'est pourquoi vous l'avez fait pour constituer 
votre disque /Mon.Systeme. La manipulation est 
la même s'il s'agit d'un modem ou d'un disque 
dur: seuls les drivers sont différents. 

Un driver peut facilement s'activer ou se désac- 
tiver (voir plus haut: la marche à suivre est la 
même que pour les inits). Par exemple, si le Fin- 
der vous embête à allumer tout le temps les am- 
poules de vos disques 5,25, il suffit de désacti- 
ver le driver concerné, et de rebooter, pour être 
tranquille. 

Ne désactivez cependant pas le driver appelé 
Console.Driver: ce driver, qui n'est encore utilisé 
que par GS/OS et par quelques programmes, 
est un excellent gestionnaire de l'écran-texte du 
GS, que les programmeurs commencent à dé- 
couvrir. 

Notez aussi que les fichiers appelés Printer et 
Modem de ce sous-catalogue ne sont pas des 
drivers d'imprimante et de modem, mais ceux 
des ports (1 et 2) du GS. Laissez-les en place. 


. /System/FSTS: 
l'indépendance de GS/OS 


Le sous-catalogue /Fsts (File System Transla- 
tors) contient les modules permettant à GS/OS 
de travailler avec le système d'organisation des 
fichiers utilisé par Prodos (Pro.Fst), et de recon- 
naître et de gérer écran et clavier connectés au 
GS (Char.Fst). GS/OS, c'est une de ses forces et 
de ses supériorités sur énormément d'autres 
systèmes d'exploitation, est indépendant de 
l'organisation concrète des disques qu'il lit. Il 
est tout à fait possible d'imaginer d'autres Fsts 
permettant de lire des disquettes au format HFS 
Macintosh, au format MS/DOS ou au format... 
Dos 3.3. 

Déjà, GS/OS sait lire les disques compacts au 
format High-Sierra, et, si vous êtes en réseau 
AppleShare, vous pourrez naviguer sur les dis- 
ques Mac avec le Fst AppleShare. Il est donc in- 
exact de dire, par exemple, que GS/OS limite 
les partitions sur un disque dur à 32 Mégas, 
puisqu'il sait lire des disques HighSierra de 600 
Mégas d'un seul tenant: c'est Prodos 8 qui a 
cette limite, donc le Fst Prodos de GS/OS qui 
gère la compatibilité avec Prodos 8. 


/System/Tools: la boîte à outils 


Le sous-catalogue /Tools contient les fameux 
outils constituant la boîte à outils de l'Apple 
II GS. Ces outils évoluent à mesure des mo- > 
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difications apportées au système d'exploitation. 
Ils sont une énorme bibliothèque de routines 
permettant aux programmeurs de se dégager de 
tout ce qui est en relation avec l'interface utilisa- 
teur. Les outils sont numérotés et chacun 
d'entre-eux joue un rôle particulier: gestion de 
la mémoire, gestion des menus déroulants, ges- 
tion du son, etc. 

Dans ToolBox-Mag, nous avons publié deux ou- 
tils complets que vous pouvez rajouter à votre 
système en les copiant dans le sous-catalogue 
Tools. Ces outils permettent aux program- 
meurs d'utiliser des musiques Music Studio et 
Soundsmith dans leurs propres programmes. Il 
en est de même pour le Tool de SynthLab, 
d'Apple. 


/System/Fonts: | 
les polices de caractères 


Le sous-catalogue /Fonts contient les polices de 
caractères disponibles pour les applications les 
utilisant. Il y a en Rom une fonte, Shaston.8, qui 
est utilisée quand aucune autre fonte n'est dis- 
ponible dans ce sous-catalogue. 

Deux fichiers de ce sous-catalogue ne sont pas 
des polices de caractères. FontLists contient la 
liste des fontes présentes dans le sous-catalogue; 
ce fichier est modifié par le Font Manager (outil 
responsable de la gestion des polices de carac- 
tères) dès qu'il détecte un changement, ajout ou 
suppression dans les fontes. FastFont est une 
version prédessinée de Shaston 8; cela permet à 
QuickDraw IT (l'outil responsable de l'affichage) 
de faire des affichages plus rapides. FontLists 
peut être effacé, il sera de toute façon reconsti- 
tué. Si vous supprimez FastFont, le GS sera plus 
lent dans ses affichages, mais continuera à mar- 
cher. 

Pour installer une fonte, il suffit de la copier 
dans ce sous-catalogue. Une solution plus élé- 
gante consiste à utiliser “Fonte/DA Installa- 
teur” (voir plus haut) qui permet aussi d'instal- 
ler des polices de caractères. Les polices de ca- 
ractères publiées dans ToolBox-Mag 1 et 3 sont 
utilisables de cette façon. 


Compléments 


Le catalogue /Icons du catalogue principal 
contient les petites images utilisées par le 
Finder. Ces icônes sont éditables (par exemple 
avec Iconed) ce qui permet de personnaliser 
l'écran (le “bureau”) sur lequel on travaille. 
Chaque programme et chaque fichier peut avoir 
une image associée. Comme ces images sont in- 
suffisantes pour décrire proprement les fichiers, 
ce catalogue contient aussi des fichiers “FType” 
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contenant, en bon français, des explications sur 
les divers types de fichiers pour ceux qui savent 
lire (commande “Lire les Informations” du Fin- 
der). 

Chaque volume GS/OS peut avoir par ailleurs 
son propre catalogue /lcons, contenant des 
images spéciales pour les fichiers qu'il contient. 


Nous n'avons pas parlé ici du programme In- 
stallation qui se trouve sur la disquette /Utili- 
taires. Cet utilitaire fourni avec le système per- 
met, à partir de fichiers de Scripts, de réaliser 
un certain nombre d'installations et de désin- 
stallations: système, drivers, tools, etc. 

Chaque configuration ayant un système particu- 
lier et personnel, il nous semble préférable d'uti- 
liser un copieur de fichiers performant (Prosel 
16) pour réaliser tout le travail sur le système et 
tous ces modules. La lecture des fichiers du ca- 
talogue /Ufilitaires/Scripts est cependant utile 
pour voir le travail que l'Installeur conseille. 

Je ne m'étendrai pas plus sur le disque /Utili- 
taires: en-dehors de l'Installeur et d'un utilitaire 
pour le formatage et la partition des disques 
durs (Advanced Disk Utility), il contient des res- 
sources complémentaires pour le système. Si 
vous avez une imprimante Epson, une Laser- 
Writer, si vous êtes connecté sur AppleShare, si 
vous avez une Video Overlay Card, un interface 
Midi Apple, un lecteur de disques compacts, 
etc, etc, vous trouverez dans les différents sous- 
catalogues de ce disque les compléments néces- 
saires à installer dans votre système (Tools, 
NDAs, CDAs, CDevs, Drivers, Inits, etc: toutes 
ces petites bêtes vous sont désormais fami- 
lières). 

Il faudrait d'ailleurs ajouter à cette liste les com- 
posants du système qui vous sont fournis avec 
les périphériques non-Apple (drivers de disques 
durs, de carte SCSI, de carte Midi, accessoire de 
Quickie, etc), ainsi que vos inits, accessoires, 
fontes, tools. Tout cela fait aussi partie du sys- 
tème: il n'existe pas le système, mais seulement 
votre système. 


Le vrai système: le vôtre 


Au fond, cela signifie en fait que le véritable 
système du GS (c'est-à-dire le vôtre) fait bien 
plus de 800k. Si vous incluez toutes les fontes, 
les Inits, les accessoires, les drivers et Cdevs, ac- 
tivés ou désactivés, vous arriverez très facile- 
ment à un système de deux ou trois mégas, et 
c'est tout-à-fait normal. 

Le disque /Mon.Systeme n'était qu'un mini-sys- 
tème qui a pu nous servir de démonstration, 
mais qui n'est pas sérieusement utilisable dans 
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le monde réel. Il est incapable de contenir ne se- 
rait-ce que l'ensemble des accessoires, fontes, 
outils, inits, etc, que ToolBox-Mag vous a d'ores 
et déjà fournis! 

Un disque dur ou tout autre lecteur de 20 Mé- 
gas au moins est désormais une nécessité in- 
contournable sur l'Apple IIGS, comme 
d'ailleurs sur tous les ordinateurs personnels 


Mag, ne sont plus qu'un moyen de communica- 
tion entre utilisateurs. 

Vous devinez donc quel sera le sujet d'un des 
prochains “GS pour débutants”: il ne sera déjà 
plus pour “débutants” (vous ne l'êtes désormais 
plus!), et il concernera la gestion des mémoires 
de masse. 


GS/OS, un système hors pair 


Vous voilà donc à même de faire maintenant, en 
connaissance de cause, votre propre système, 
spécial pour votre configuration. Vous pourrez 
ensuite utiliser tranquillement les programmes 
de ToolBox-Mag. A vous de jouer. 

Oui, il y a un peu de travail qui vous revient: 
c'est le prix de la puissance et de la souplesse du 
système du GS. Avec un peu de pratique, vous 
passerez très vite du désarroi du débutant 
(“c'est quoi, une Init?”’) au sourire indulgent du 
connaisseur (“fiens, le Finder du Mac ne permet 
pas de désactiver une Init ou un accessoire?"). 


Quand on fait un travail professionnel en infor- 
matique, on est bien forcé de fréquenter plu- 
sieurs systèmes d'exploitation, au moins ceux 
des machines les plus diffusées par ailleurs, à 
savoir MS-Dos et HFS-Macintosh. Et on ne peut 
que se rendre à l'évidence: si l'on met à part la 
question du multitâches, que GS/OS ne prati- 
que pas, GS/OS est une référence pour les 
autres systèmes d'exploitation d'ordinateurs 
personnels (le Mac ayant le mérite, avec son fu- 
tur système 7, de prendre explicitement modèle 
sur lui). 


En apprenant à maîtriser GS/OS, vous ne vous 
pliez pas à des tics aberrants, des limites histori- 
ques, des habitudes arbitraires ou des bidouilles 
incompréhensibles. 

Non seulement vous apprenez à piloter votre 


des meilleurs logiciels existant en ce moment. 


Quand on s'est formé sur GS/OS, on devient un 6 
exigence des | P' 
utilisateurs est un facteur essentiel du progrès | 


utilisateur exigeant: cette 


de l'informatique personnelle. m 
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d Utiliser l Installeur. 


Si Eric vous déconseille d'utiliser l'installeur, 


aveugle” ( 


:sément fait. pour Re tiens écrase sans. 


(j'ai dit “ordinateur”, pas “console” ni “casse- uns les fichiers existants ne ne lui qu 


role”). Les disquettes, qu'il s'agisse des dis- be 


IBox- | Ë | 
quettes système ou des disquettes ToolBox ; de oUVGE te Finder à sa ri il vous 


‘laisse l'essentiel du 5.04 américain si vous 
: l'aviez mis auparavant, etc. Dans les systèmes 
‘ultra-personnalisés (super-bidouillés) que ten- 
dent à devenir les catalogues 1System de nos 
disques durs, le résultat peut-être imprévisible, 


indémarrable et/ou indémêlable, 


Pourtant l'Installeur est bien pratique, parce 
qu ‘il travaille tout seul et parce qu'il n'oublie 
jamais, lui, les petits fichiers cachés dans des 


recoins de la disquette /Urilitaires. Si vous 


vous décidez pour la Laser, par exemple, c'est 
la meilleure formule pour installer l'ensemble 
des fichiers nécessaires. 

“Voici donc un truc tout simple que j'utilise, et. 
sus marche pour tous ceux qui ont un disque 


dur. Il évite même de fabriquer la disquette 
Mon. Systeme d'Eric: 


+ Bootez la disquette /Disque. Systeme du 5.04 


français. Le Finder devrait reconnaître votre 
disque dur. 

+ Renommez (c'est ça le truc) le catalogue 
{System de votre disque dur en /System.1. 

+ Introduisez alors la disquette /Urilitaires, et 


lancez l'Installeur. Dfîtes-lui d'installer le maxi- 
mum sur votre disque dur. Comme il ne trou- 
vera pas de catalogue /System, il va en créer. 
un nouveau sans rien détruire de l'ancien qu 


et VOUS fera un système qui devrait, en prin- 
cipe, marcher. 

. Redémarrez alors sur votre disque dur: si ça 
marche, il ne vous restera plus qu'à recopier 
(je dis bien copier, pas déplacer) de /System.l 
vers /System tout ce que vous aviez rajouté 


“Au moindre pépin, il suffit de renommer (Sys: 
‘tem en /System.2 et 1System. 1 en. 1System 
pour retrouver un dur an marche: vous ie 


machine, mais vous vous exercez à utiliser un | 





MuSed 


vers un séquenceur avec l'outil SynthLab 
Jean-Pierre Charpentier 






[INDLR: Sérieux problème avec cette seconde partie de l'étude de Jean-Pierre Charpentier sur le 
Tool35: comme toujours, il vous faut le Tool35; cette fois-ci, il vous faut aussi un interface Midi 
et un clavier: c'est normal, c'est le but du jeu. Cela devrait s'arrêter là: hélas, il vous faut aussi… 
le système 5.04 version américaine. En effet, il y a un pépin, un problème quelque part dans le 
5.04 français qui empêche MuSeq de tourner, alors qu'il marche parfaitement sous système US. 
Il nous a semblé que le coupable était le petit fichier Tool.Setup du sous-catalogue /Sys- 
tem/System.Setup. Nous avons donc mis sur la disquette ToolBox-Mag le fichier Tool.Setup 
du Système 5.04 américain. En remplaçant, dans votre système, le Tool.Setup français par le 
Tool.Setup US, ça devrait marcher (ça marche chez nous). Mais nous ne garantissons rien… 

Ca n'est pas si grave: MuSegq est surtout conçu pour être utile aux programmeurs, en démon- 
trant l'utilisation de la partie Midi du Tool35. Ce sont les sources qui sont le principal. Du 
coup, puiqu'il ne marche à coup sûr qu'avec le système américain, nous avons aussi laissé les 
ressources en anglais. À vous de franciser avec Genesys. Quand même, toutes nos excuses. Et si 


















A propos de SynthLab 


Tout d’abord quelques précisions pour être sûr 
que tout le monde parle bien le même langage. 
Le package appelé SYNTHLAB, tel qu'il est ven- 
du par l'APDA, regroupe: 

+ MIDISynth, qui est le Tool35 

+ synthLab, (sans majuscules) qui est un pro- 
gramme démontrant l’utilisation du Tool35 

+ MIDI.CDev, qui est un fichier utilisé par le Ta- 
bleau de bord. A chaque fermeture du CDev MI- 
DI.CDev, autrement dit à chaque fois que vous 
modifiez votre configuration Midi, un fichier de 
configuration nommé Midi.SetUp sera automa- 
tiquement sauvé dans le sous-catalogue “/Sys- 
tem/Drivers. Ce fichier est utilisé pour indiquer 
au Tool35 quel driver Midi doit être chargé, et à 
quel endroit. 


Le Tool35 pouvant être trouvé avec certains lo- 
giciels tout nu, sans le CDev Midi, voici le for- 
mat du fichier généré “/System/Drivers/Midi.Set- 
Up (type BIN, type auxiliaire $0000, longueur 
37 octets). 


+ Word: Slot externe/Interne (0/1) 

+ Word: Numéro de slot (1-7) 

e Str[32]: Chaîne Pascal du nom du fichier Dri- 
ver MIDI (nom de fichier, pas chemin d'accès 
complet: le préfixe supposé est “/System/Dri- 
vers/). 
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quelqu'un peut trouver le bug et son remède, il rendra service à tous] 





Présentation de MuSeq 


Le programme de ce numéro s'appelle 
MidiSynth.MuSeq car c'est la base, d'où le Mu, 
d'un séquenceur, Seq. Il ne faut surtout pas trop 
lui en demander, synthLab est là pour ça. 

Pour comprendre toute la puissance du Tool35, 
il faut déjà posséder quelques connaissances 
Midi. Or un article couvrant le standard Midi en 
entier remplirait tout un numéro de ToolBox- 
Mag. Heureusement on trouve maintenant faci- 
lement des livres en français sur Midi dans n'im- 
porte quelle (bonne) boutique d'instruments de 
musique. 

Mais commençons par le commencement: au 
démarrage de MuSeq, la séquence Bee.Seq est 
chargée en mémoire. Le fichier Bee.Seqg doit 
donc obligatoirement se trouver dans le même 
catalogue que MuSeq, ainsi d'ailleurs que 
Comb.Bnk et Comb.Wav, respectivement fichier 
d'instruments et fichier d'onde référencés dans 
Bee.Seg. 

Dans le programme précédent, on pouvait choi- 
sir sa séquence facilement à l'aide d'un _SFGet- 
File. Maintenant le nom du fichier séquence est 
inscrit en ressource. Ca ne sert à rien, sauf. à 
montrer que c'est faisable. Vous pouvez éditer 
ce nom à l'aide d'un éditeur de ressources 
comme Genesys. Attention à ce que le nom ne 
dépasse pas 15 caractères et à ce que le fichier 
(et ses fichiers associés) existent réellement 
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dans le catalogue de MuSegq. 

La ressource contenant ce nom est de type 
rCllnputString  ($8005) et son ID est 
Synth_Seq_ClInputString_I $00000001). Pour 
connaître les fichiers associés à une séquence il 
faut utiliser synthLab (ou BlockWarden!). 


MuSeq se compose principalement de quatre 
fenêtres: 

WDO01 = fenêtre de commande du magnéto- 
phone (Stop, Start, Avance rapide, Retour forcé 
au début). 

WD02 = fenêtre du choix du canal de base et du 
mode. 

WD03 = fenêtre de validation des pistes en lec- 
ture et en enregistrement. 

WDO04 = fenêtre d'assignation des pistes par 
rapport aux canaux Midi (donc aux instru- 
ments). 


Certains paramètres sont constants: 


Le tempo est récupéré dans le fichier séquence. 
_SetTempo (SEQU_PTR.Tempo*2-10) 


Le battement est aussi récupéré dans le fichier 
séquence. 
_SetBeat (SEQU_PTR.Ticks_Per_Beat) 


Toutes les pistes sont validées en lecture (par 
défaut). 
_SetPlayTrack (Track Number (0 -> 15), True) 


Les événements de chaque piste ne subissent 
pas de désassignation de canal, donc ils joue- 
ront par défaut leur instrument. 
_TrackToChan (Track Number 
EOS=$FFFF) 


J'ai choisi d'envoyer la sortie du séquenceur en 
permanence vers le synthétiseur et l'interface 
Midi. 

_SetTrackOut (Track Number (0 -> 15), PathVa- 
lue) avec PathValue=0. 


L'assignation des instruments est directe. 
_SetInstrument (*(BANK_PTR.Inst_Record_Off- 
set(0 -> 15)), Inst Number(0 -> 15)). 


Notez que les pistes et canaux Midi sont numé- 
rotés de 1 à 16 pour l'utilisateur et de 0 à 15 ($F) 
pour le programmeur (exception faite du flag 
d'enregistrement RECDFLAG où on met le nu- 
méro de piste +1, car pour la piste 1 le flag se- 
rait à zéro). 


(0 -> 15), 


Première fenêtre 


Dans la première fenêtre (WDO01), il n’y a pas 
de contrôle sur la limite du bouton Forward, 
donc à utiliser avec précautions. 

Le bouton de RAZ ramène à zéro dans tous les 
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cas, que l’on soit arrêté, en lecture ou en enre- 
gistrement. 

Comment peut-on enregistrer alors qu'il n’y a 
pas de bouton Record? À chaque appui sur le 
bouton Play on regarde si RECDFLAG est dif- 
férent de zéro, c'est à dire si une piste est mar- 
quée en enregistrement. Si oui, on envoie un 
Play avec Record et c'est tout! 

Le démarrage en enregistrement validera égale- 
ment automatiquement le métronome, qui bat- 
tra le tempo. 


Deuxième fenêtre 


La fenêtre numéro 2 (WD02) permet de choisir 
le mode d'enregistrement du séquenceur et le 
canal de base. Pour ce dernier, on peut bien sûr 
choisir entre 1 et 16. Le choix du mode agit 
comme un filtre pour les données qui arriveront 
par exemple d'un clavier Midi. 

En mode Omni, tous les événements Midi sont 
affectés au canal de base. 

En mode Poly, les événements sont triés. Ceux 
correspondant au canal de base sont enregistrés 
sans modification. Les autres vont directement à 
la poubelle, et sont perdus corps et âme! 

En mode Multi, le filtre est déconnecté et tous 
les événements sont enregistrés sans aucune 
modification. Ce mode est rarement utilisé, car 
en général on préfère avoir tous les événements 
d'une piste pointant sur le même canal, donc le 
même instrument. 


Troisième fenêtre 


La fenêtre 3 (WD03) permet de fixer chaque 
piste en lecture et en enregistrement. Pour la 
lecture, toutes les combinaisons sont possibles 
entre les seize pistes, donc l'utilisation de cases 
à cocher est logique. 

Une seule piste pouvant être en enregistrement, 
a priori le choix de boutons radio s’imposait. 
Mais on peut n'avoir aucune piste en enregistre- 
ment, ce qui représente un cas non prévu dans 
la gestion des boutons radio. J'ai donc utilisé 
des cases à cocher, avec une gestion un peu par- 
ticulière: à chaque clic sur une case, si celle-ci 
passe de 0 à 1, j'efface toutes les autres cases; si 
elle passe de 1 à 0, je ne touche pas aux autres. 
Tout ce qui apparaît dans WD03 est fait de 
contrôles, il n’y a aucun dessin direct dans la fe- 
nêtre, sauf pour le fond. 

Notez que l'utilisation de StaticText pour cha- 
que numéro est une erreur. À partir du moment 
où les différentes parties à afficher sont ali- 
gnées, on a fortement intérêt à utiliser un seul 
StaticText de longueur convenable. C’est moins 
lourd et plus facile à gérer (voir WD04). > 





De plus Genesys est encore buggé en version 1.2 
(erreur $0204 = Invalid Operation on Locked 
Block). J'ai pu vérifier que ce bug était corrigé 
en version 1.2.4. 


Quatrième fenêtre 


Pour la fenêtre 4 (WD04), j'ai choisi d'utiliser 
des boutons radio au lieu de scroll-bars, ce qui 
est une grave erreur du point de vue de la lour- 
deur et du temps de réponse du programme! 
Même avec ma TransWarp 8 Mhz turbo-injec- 
tion, ça rame tellement que j'ai été obligé de 
prévoir un message d'attente pendant la cons- 
truction des fenêtres, de peur que l'utilisateur 
ne reboote, pensant être planté! 
Vous pouvez donc, avec cette fenêtre, rediriger 
les événements de chaque piste vers un canal 
Midi particulier, ou laisser le réglage sur le ca- 
nal zéro qui signifie "pas de redirection”. Dans 
ce cas les événements jouent sur leur canal 
propre, c'est à dire celui sur lequel ils ont été en- 
registrés. 
On peut considérer cette fenêtre comme une as- 
signation des pistes en sortie alors que l’ensemble 
canal de base-mode permet une assignation en 
entrée. 
Si vous branchez un synthétiseur/expandeur 
multi-timbral, vous aurez aussi la possibilité de 
régler l’assignation en sortie sur votre appareil. 
Par exemple, avec la séquence Bee.Seq (Vol du 
Bourdon), le canal numéro 1 est celui du Drum- 
Kit. Si vous envoyez toutes les pistes sur le ca- 
nal 1, toutes les notes seront jouées avec cet in- 
strument, et vous obtiendrez un beau solo de 
batterie. 

Notes de programmation 


Du point de vue de la programmation, j'ai mis 
tout ce que j'ai pu en ressources. Cela vous per- 
mettra de faire une version française de MuSeq 
si vous le souhaitez (Toolbox-Mag 4 et son De- 
faultFile français sont arrivés trop tard, Genesys 
avait déjà démarré une application en anglais). 
Avec l'arrivée des super-contrôles, est aussi arri- 
vée une nouvelle forme de gestion des 
contrôles. Les contrôles étant référencés par un 
handle de 32 bits difficile à manier en assem- 
bleur, je faisais comme tout le monde et affectais 
un numéro dans le champs RefCon de chaque 
contrôle. Maintenant c'est inutile, car chaque 
contrôle posséde son propre ID. 

Mais comme comme les routines d'accès se font 
toujours par handle, il est intéressant de se fa- 
briquer de petites routines que l’on va pouvoir 
copier /coller tous azimuts. 


Par exemple, pour rendre inactif le Contrôle 2, il 
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faut d'abord récupérer le handle: 


pushlong #0 [on fait de la place] 
pushlong  WDO01 [ctlWindowPFtr] 
pushlong  #Control_2 ctlID 
_GetCHlHandleFromID 

pulllong : LONGBUFF 

pushword  #255 [inactif] 


pushlong : LONGBUFF 
_HiliteControl 


On peut comprimer les deux opérations en une 
seule, en jouant sur la pile: 


pushword  #255 [inactif] 
pushlong #0 [on fait de la place] 
pushlong  WD01 [ctlWindowPtr] 


pushlong  #Control_2 cHHID 
_GetCtlHandleFromID | 
_HiliteContral | 





C'est plus compact et plus pratique pour le co- 
pier/coller. De plus, si cé{WindowPtr corres- 
pond à la fenêtre de premier plan, on peut 
mettre Nil comme valeur. 


À noter: le refCon de chaque fenêtre doit être 
fixé au moment de l'appel _NewWindow2, car 
celui de la ressource template n'est pas pris en 
compte. Voyez la Note Technique IIGS 24, révi- 
sion Janvier 91. 


EE 


Comme le Tool35 tourne en tâche de fond, l'ap- 
pel _SetCallBack permet de récupérer certains 
événements. Dans MuSeq, je récupère seule- 
ment l'arrivée d'un packet Midi complet 
(PACK_IT), pour faire flasher la bordure, et la 
fin de la séquence (END_SEQ), pour arrêter la 
lecture/enregistrement. 


Pour les nombreux boutons radio (17*16 !) de 
WDCH4 j'ai utilisé Rez et DeRez. Cela m'a permis 
d'assigner la même chaîne Pascal vide pour les 
titres de tous les boutons ([ID=$7777777). 


| 
L'appel _SetVelComp sert à ajouter du volume | 
aux notes envoyées par le clavier Midi. 

| 


L'appel _GetMSData donne l'adresse de la page 
zéro utilisée par le Tool35. On pourra y pêcher 
des informations intéressantes à n'importe quel 
moment. 

Conclusion 


Terminons par une appréciation: si le Tool35 est 
plus fiable pour sa partie Midi que le MidiMa- 
nager, ce n'est pas encore la panacée. On se re- 
trouve de trop nombreuses fois planté dans le 
driver Midi! Même avec tous les efforts pour 
décharger le driver proprement, on rend sou- 
vent visite au monitor (ou au debugger). 
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Infroduction à la programmation 
de l'Apple Il GS : 


La gestion des événements 


Jean Destelle 


Dans cette série d'articles, la programmation du GS 
est expliquée à l'aide d'exemples en Pascal. Toute- 
fois, comme le vocabulaire de la Toolbox est univer- 
sel, et utilisé de la même façon par les autres lan- 
gages comme l'Assembleur et le C, il intéressera 
tout lecteur désireux de mieux comprendre la pro- 
grammation du GS. 


La boucle des événements 


Un programme du type "DeskTop", fonctionne grâce 
à l'emploi d'une boucle d'événements. Cette boucle, 
décrite en général dans une procédure portant le 
nom de MainEventLoop tourne en permanence tant 
que le programme fonctionne. 

Après avoir mis en place tous les éléments du "bu- 
reau" et principalement les menus déroulants qui 
permettront d'appeler les diverses fonctions de l'ap- 
plication, on lance la boucle d'événements. Sans 
cesse, infatigable, elle va répéter un circuit très com- 
plexe, vérifiant tout au passage. 


Le vrai patron de ce circuit touristique permanent, 
c'est TaskMaster, un serviteur incomparable (celui- 
là, les programmeurs sur Mac nous l'envient). 


TaskMaster 


TaskMaster fait un boulot formidable. Entre autres, il 
fait tout seul presque tout ce qui a été décrit dans les 
ouvrages spécialisés sur la "boite à outil du GS" à ses 
débuts, et qui a rebuté nombre d'entre nous. 
A chaque tour, il demande à EventManager s'il s'est 
rar quelque chose, en utilisant la fonction Get- 
extEvent. EventMgr, lui n'a pas cessé de guetter 
des événements. Tous ceux qui se sont produits de- 
puis le dernier passage de la boucle sont notés à la 
queue-leu-leu dans une file d'attente. S'il y a un "évé- 
nement" dans cette file d'attente, EventMpr l'indique 
à TaskMaster, en lui donnant toutes les informations 
possibles. Cet événement peut être l'enfoncement 
d'une touche, un clic de la souris, ou toute autre 
chose. 
Suivant les instructions que vous lui aurez données, 
TaskMaster fera tout le nécessaire à votre place, ou 
seulement très peu, si vous vous réservez le plaisir 
par exemple de faire vous-même la gestion complexe 
d'une barre de défilement, ou d'un autre système vi- 
cieux du même acabit. Il s'occupera même de redes- 
siner les fenêtres en cas de besoin. 


Avec l'outil TextEdit, TaskMaster vous donne un tel 
coup de main que cela semble miraculeux. Avec le 
système 5.0, Apple a vraiment simplifié la vie des 
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programmeurs GS. Vous en avez un exemple dans le 
petit programme MiniDeskTop dans lequel vous 
pouvez admirer comment TaskMaster, tout seul, 
sans que nous ayez eu besoin d'écrire la moindre in- 
struction à ce sujet, gère le texte à l'intérieur d'un 
contrôle TextEdit. Regardez-bien le source. Il n'y a 
rien à chercher! TaskMaster fait cela tout seul. 


NB: MiniDeskTop est un programme de démonstra- 
tion, très court, utilisant l'unit AuxSelecti de Sélect, 
destiné à servir à la fois de début standard et de base 
à nos explications sur l'emploi du Pascal. Vous le 
trouverez dans le catalogue /MiniDeskTop du disque. 


TaskMaster gère ainsi tous les contrôles, aussi bien 
les boîtes à cocher que les nouveaux menus Pop-Up. 
Et les fenêtres? Aussi! Cela n'a l'air de rien, mais tous 
ces mouvements de fenêtres, actionnements de 
barres de défilements, zooms, etc, il aurait fallu, sans 
TaskMaster, les obtenir en appelant toutes sortes de 
fonctions successives, un vrai casse-tête. 


Notez que puisque TaskMaster gère les événements, 
et qu'il existe un outil "EventManager" dans la boîte 
à outils, vous trouverez tout naturellement TaskMas- 
ter. dans l'outil "WindowManager"! 


Le Task-Mask 


L'ordre de mission que vous devez donner à Task- 
Master est un “masque”, le "Task-Mask”. C'est en fait 
un "bit-flag" énorme, qui comporte 32 bits, avec des 
tas d'instructions pour faire et ne pas faire certaines 
tâches. Ce masque est l'un des champs de l'event-re- 
cord, une structure de données dans laquelle Event- 
Manager note tout ce qui arrive. 


Octets, bits, et bit-flag 


Vous le savez, chaque octet se compose de 8 élé- 
ments binaires (bits) successifs, qui ne peuvent 
prendre que la valeur 0 ou la valeur 1. Par exemple 
l'écriture en binaire du nombre $1F est 00011111, que 
vous pouvez décomposer en deux quartets (nibbles): 
0001, équivalent au chiffre hexadécimal 1, et 1111, 
équivalent au chiffre hexadécimal F. 

Un Bit-Flag est un nombre dont chacun des bits sé- 
parément sert à enregistrer une donnée. Sur un octet 
on peut ainsi noter jusqu'à 8 conditions indépen- 
dantes. Le mot flag (drapeau) est à prendre ici au 
sens de "panneau indicateur”. 

Les bit-flags sont très utilisés par Apple dans la Tool- 
box. Ils permettent de résumer en un seul octet jus- 
qu'à 8 conditions différentes. Dans le GS, ordinateur 
16 bits, vous rencontrerez surtout des bit-flags 
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de deux octets. 

Attention, les bits se numérotent de droite à gauche. 
Dans l'exemple du nombre $1F, la numérotation est 
la suivante: 

Numéro d'ordre du bit: 76543210 
Valeur de chaque bit : CDAGICOMMTCININT 


Autre exemple, le bit-flag Attributes utilisé par la 
fonction NewHandle de MemoryManager est un en- 
tier de deux octets. Supposons que la valeur de cet 
entier soit $8018: 

octet de poids fort  octet poids faible 
Numéro du bit: 15141312111098 76543210 
Valeur dubit 10000000 00011000 
la mise à 1 du bit 15 signifie: le bloc de mémoire est 
verrouillé (Aftrlocked); la mise à 1 du bit 4 signifie: le 
bloc de mémoire ne doit pas chevaucher la limite 
d'un banc de mémoire (Attrnocross}; la mise à 1 du 
bit 3 signifie: on ne doit pas utiliser la mémoire spé- 
ciale (AftrNoSpec). 


Utilisation de constantes pour donner des valeurs 
aux bit-flags. Continuons avec l'exemple ci-dessus. 
Apple définit, dans le Toolbox Reference, parmi 
d'autres, les constantes: 


attrLocked = $8000; 
attrNoCross = $0010 
attrNoSpec = $0008; 


Dans l'écriture d'un source, on peut utiliser ces cons- 
tantes pour définir un bit-flag, en les additionnant. 
En effet, attrLocked + attrNoCross + attrNoSpec = 
$8000 + $0010 + 50008 = $8018. On peut donc écrire 
directement $8018. Mais il est beaucoup plus parlant 
d'écrire attrLocked + attrNoCross + attrNoSpec, ce que 
les compilateurs comprennent très bien. 


Bits-flags et masques. Un “masque” est un nombre 
généralement écrit en hexadécimal sur 1,2 ou 4 oc- 
tets. Ce nombre servira, au moyen d'une opération 
très rapide pour le processeur (Opération "ou" , “et” 
ou bien "ou exclusif” avec un autre nombre), à four- 
nir un résultat déterminant pour la suite des opéra- 
tions. Le "masque" aura ainsi "décodé" le nombre. 
Par exemple, si on doit lancer une procédure quand 
le nombre entier x est pair (c'est-à-dire que son bit 
numéro 0 est à 0), il suffira de faire une opération 
"et" entre la variable x et le masque $0001. Si le résul- 
tat de cette opération est 0, c'est que x est pair. Si le 
résultat est 1, c'est que x est impair. On se sert beau- 
coup de “masques” pour "filtrer" des codes, par 
exemples pour éliminer des caractères indésirables 
lors de l'impression. 


Ecrivons un programme 


Reportons-nous au source de MiniDeskTop. Au dé- 
but de la MainEventLoop, vous lisez le traditionnel: 
gMaïinEvent.wmTaskMask:= $001FFFFF; 

gmainEvent est le nom de l'eventRecord, qui doit être 
une variable globale; wmTaskMask est ce fameux 
masque. La valeur $001FFFFF est celle qu'on obtient 
en répondant oui à toutes les questions sur ce qu'il 
doit faire. Il signifie: faites tout à ma place. 

Muni de ce blanc-seing, TaskMaster gérera, quand 
vous ferez appel à lui, les menus, les fenêtres, les 
contrôles, et tout et tout, sans que vous ayez à inter- 
venir, du moins tant que ne vous est pas signalé un 
événement que vous voulez traiter vous-même. 
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La boucle principale 


Dans la procédure MainEventLoop, il y a ensuite l'as- 
signation de la valeur booléenne false à la variable 
done (done veut dire "c'est fini"). Puis la boucle dé- 
bute par repeat, et se terminera à until si la condition 
done est vraie, œ qui pourra être le fait d'une déci- 
sion extérieure mettant fin à l'application, en général 
une procédure DoQuit. 
Aussitôt après repeat, vous trouvez l'instruction: 
code:= taskMaster($FFFF, gmainEvent); 
Cette instruction est l'appel à TaskMaster, et lui 
donne l'ordre de regarder dans l'event-record les cir- 
constances de l'événement qui s'est produit, et d'agir 
en conséquence. 
TaskMaster fait donc son travail, qui est parfois très 
compliqué. Puis il vous rend compte, en mettant à 
votre disposition, à l'intérieur de l'event-record, di- 
verses Fr med où vous pourrez allez les cher- 
cher quand vous en aurez besoin: le genre d'événe- 
ment, et aussi des données importantes qui varient 
suivant le genre de l'événement. 
Il vous donne en premier lieu une indication géné- 
rale sur ce qui s'est produit, un nombre qui se trouve 
dans la variable code. Suivant la valeur indiquée, 
vous saurez qu'il s'agit, par exemple, de l'actionne- 
ment d'un menu, ou d'une touche de clavier, ou d'un 
clic dans une fenêtre, ou dans un contrôle. Si la chose 
est de nature à vous intéresser, vous vous en occupe- 
rez en appelant des procédures que vous devrez 
écrire; si elle ne vous intéresse pas, vous ne vous en 
occupez pas, TaskMaster le fera à votre place. 
Les valeurs possibles du code d'événement sont des 
constantes dont les noms décrivent l'événement. Il y 
a un grand nombre de possibilités. 
Par exemple wGoAway indique qu'on a cliqué dans 
la case de fermeture d'une fenêtre. Vous devez alors 
appeler une procédure doclose qui fermera aussi bien 
un NDA qu'une des fenêtres de l'application. De 
même WinMenuBar indique qu'on a actionné un me- 
nu et cliqué dans l'un des choix proposés par le me- 
nu. Vous appelez alors une procédure pour agir en 
conséquence: dans MiniDeskTop, elle s'appelle Gerer- 
Menu. Ou encore WinControl indique qu'un événe- 
ment s'est produit dans l'un des contrôles de la fe- 
nêtre sélectionnée: on appelle alors GererControles. 


La boucle d'événements de Sélect 


Dans Sélect on s'occupe particulièrement du cas 
WinContent, qui indique un clic dans le contenu 
d'une fenêtre. Cela parce que les cases de lancement 
des programmes ne sont pas des contrôles, mais de 
simples rectangles dessinés dans la fenêtre. Il faut 
donc prendre nous-même ce problème en charge en 
appelant la procédure Traiter Wincontent. 

Notez aussi que nous prenons en compte le code in- 
Null dont on ne se sert pas d'habitude, et qui indi- 
que tout simplement qu'aucun événement ne s'est 
produit. Nous nous en servons pour appeler une 
procédure Economiseur. Cette procédure regarde de- 
puis combien de temps il ne s'est rien passé, et si 
plus de deux minutes se sont écoulées et que Sélect 
n'est pas en mode "édition", elle provoquera la mise 
au noir de l'écran du GS. Si le code fourni par Task- 
Master n' a pas été retenu, tant pis; on repart pour un 
nouveau tour de boucle. > 
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Les nouvelles fenêtres de dialogue 


Dans le courant du déroulement de l'application, 
lorsque le menu appelle certaines fonctions, il de- 
vient nécessaire de questionner l'utilisateur, au 
moyen d'un "dialogue", afin de prendre les consignes 
pour la suite. 

Les dialogues sont (ou plutôt étaient) régis dans le 
GS DialogMgr, un outil extrêmement pratique. 
NP ppm les fonctions de cet outil n'ont pas 
encore, à cette date, été mises à jour pour l'emploi de 
ressources, de sorte que le dessin des fenêtres et des 
contrôles doit toujours se faire avec l'ancienne (fasti- 
dieuse) méthode. 

On n'emploie plus maintenant pratiquement que des 
fenêtres ordinaires, créées par la nouvelle fonction 
NewWindow2, et comportant des contrôles inclus soit 
au moyen de NewControl2, soit au moyen d'une liste 
de contrôles incluse dans la ressource de la fenêtre 
(ce qui est notre cas). Mais subsiste toujours la notion 
très importante de dialogues modaux et non mo- 
daux. 


Dialogues modaux et non-modaux 


Un dialogue est dit modal quand il force l'utilisateur 
à répondre à ses questions, sans lui laisser la possibi- 
lité de déclencher une autre action par un menu, une 
autre fenêtre, ou autre chose. Au contraire, il est dit 
non-modal (modeless) c'est-à-dire normal, si on peut 
ne pas y répondre tout de suite, et agir auparavant 
sur le déclenchement d'une autre fonction. Ce der- 
nier cas constitue la situation habituelle, hautement 
recommandée par Apple, qui rend toutes actions di- 
rectement accessibles à tout moment. 

Par exemple, une fenêtre d'alerte utilisant la fonction 
Alert Window dont vous rencontrerez plusieurs 
exemples dans les sources, est un dialogue modal. 
On est obligé de répondre avant de continuer. En re- 
vanche, la fenêtr an de lancement de Sélect cons- 
titue un dialogue non-modal, car à tout instant, on 
peut utiliser les autres fonctions du menu, ou bien 
employer un accessoire de bureau. 

Dans le petit programme MiniDeskTop, il n'y a pas 
(encore) de dialogue modal. Vous pouvez donc, tout 
en expérimentant les deux fenêtres, appeler les 
autres fonctions du menu. Il n'en est pas de même 
dans l'application Sélect, qui comporte de plus nom- 
breuses fonctions. 

Dans Sélect, nous utilisons plusieurs dialogues mo- 
daux. Pour les rendre indépendants des autres fonc- 
tions de l'application, nous utilisons une autre 
boucle, mise en route après que la fenêtre du dialo- 
gue, avec ses contrôles, ait été dessinée. Cette boucle 
secondaire va tourner jusqu'à ce que, le dialogue 
étant achevé, et les opérations correspondantes effec- 
tuées, on puisse revenir à la boucle principale. 

La procédure ModalLoop matérialise cette boucle. 
Elle est construite à partir des mêmes éléments de 
base que la boucle principale: gmainEvent, et Task- 
Master. Mais cette fois, nous ne donnons pas toutes 
les permissions à TaskMaster. Nous restreignons son 
rôle à quelques actions bien précises, qui lui per- 
mettront seulement de gérer les contrôles dont nous 
avons besoin. 

La valeur retenue pour le masque est $00132006. Ne 
sont pas mis à 1, entre autres, les bits concernant le 
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menu, ou la sélection éventuelle d'une autre fenêtre. 
De cette façon, le dialogue devient modal. Nous 
n'utiliserons que ce qui concerne les contrôles: action 
des touches du clavier transmises aux contrôles Li- 
nEdit qui permettent les entrées de textes et de 
nombres, et clics de la souris dans les boutons. La va- 
riable done étant réservée à la boucle principale, 
nous employons une autre variable Termine pour 
mettre fin au bouclage. Seuls les boutons de sortie se- 
ront capables de provoquer la fin de la boucle mo- 
dale, par l'intermédiaire de la variable Termine. 

En fin de boucle, avant de sortir, il ne faudra pas ou- 
blier de redonner à TaskMask sa valeur initiale, sans 
quoi plus grand chose ne marcherait. Par la suite, 
TaskMaster pourra reprendre sa tournée avec les 
pleins pouvoirs. 

Nous terminons ici cet exposé sur la gestion des évé- 
nements par le GS. Si vous savez gérer la mémoire et 
les événements, vous pouvez commencer à vous 
lancer, et écrire des programmes GS qui tournent. 






C'est bien un Apple II 






Certains programmeurs n'aiment pas 
ce que fait Joël Desnoues dans Tool- 
Box-Mag 4 pour éviter des crampes à 
Hubert. Ils n'ont pas envie que les uti- 
lisateurs puissent interrompre leur 
programme et passer dans le tableau 
de bord, histoire de tricher avec Visit 
Monitor Il. 

Comme Apple a eu la gentillesse de 
publier le vecteur du Control Panel, 
ils mettent donc un CLC/RTL à la 
place de ce vecteur, pour empêcher 
l'accès au tableau de bord par G- 
Control-Escape. 

Mais Apple tient à cette possibilité, 
puisqu'il a mis le tableau de bord en 
Rom. Et quelqu'un, chez Apple, dé- 
teste être privé de son tableau de bord 
et de son Visit Monitor: dans les Roms 
03 du GS, le coup est prévu. 

Il suffit de faire Shift-G-Control-Es- Ë 
cape au lieu de G-Control-Escape, et ! 
on se retrouve dans le tableau de bord 
(on ne passe plus par le vecteur). C'est 
bien un Apple II... 

Bien entendu, il y a des techniques 
plus sohistiquées pour désactiver le 
Control-Panel. Mais il faut être vrai- 
ment méchant. 

































— Bon alors, dans Photonix II, ça | 
marche, ce truc, ou pas? 

— Essayez... 

Olivier Goguel 
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Inroclucrion 


Vivent les ressources |! 


Vous savez que les fichiers du nouveau type 
"étendu" introduits par GS/OS ressemblent à 
ceux du Mac, et comportent deux parties diffé- 
rentes : un segment de données tout à fait simi- 
laire aux fichiers des anciens types (appelé "da- 
ta-fork"), et un segment de ressources, (appelé 
"'res-fork") destiné à contenir les ressources. 
Prenez par exemple le programme MuSeg de 
J-P. Charpentier dans ce numéro: il consiste en 
un fichier étendu. Le code, c'est-à-dire le pro- 
gramme lui-même, est enregistré dans le seg- 
ment données. Le segment ressources reçoit 
tout ce qui est susceptible d'être souvent modi- 
fié, comme les titres (afin de pouvoir les tra- 
duire), les textes des alertes, ainsi que tous les 
blocs de paramètres qui définissent les caracté- 
ristiques : emplacements, formes, formes et cou- 
leurs des menus et des fenêtres, et des éléments 
de contrôle et de dialogue. 

Les avantages de ce procédé sont évidents. On 
peut traduire facilement un programme dans 
une autre langue. On peut en modifier la pré- 
sentation sans intervenir dans la partie "code" 
toujours délicate à modifier. On peut constituer 
une librairie d'éléments standard transférables 
simplement d'un programme à l'autre sans mo- 
dification, ou avec des modifications très 
faibles. Les ressources n'encombrent pas la mé- 
moire, car elles n'y sont transférées qu'au mo- 
ment où on en a besoin. 

Avec les ressources, la plus grosse partie de ce 
que nous écrivions jusqu'à maintenant sous 
forme de source dans les programmes peut être 
constituée à partir de données standard, ou déjà 
précédemment utilisées. Cela très rapidement, 
au moyen de logiciels spéciaux: les éditeurs de 
ressources. Il devient possible, dès maintenant 
de diviser par 2, 3 ou même 4 le travail de pro- 
grammation. 


Les ressources: des données structurées 


Les "ressources" sont en fait tout simplement 
des données structurées, et "Resource Manager" 
un outil très performant pour la manipulation 
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ressources, 


de ces données. 

Qu'est-ce qu'une donnée structurée? Tout sim- 
plement un ensemble de données élémentaires 
variées regroupées sous un même nom. Les 
données élémentaires peuvent être n'importe 
quoi, à condition de pouvoir les traduire en une 
succession d'octets: des chiffres, des codes d'in- 
structions de programme, des textes, des des- 
sins, des échantillons sonores, les caractères 
d'une fonte, etc. 

Ainsi votre numéro de Sécurité Sociale est une 
donnée structurée, de même que votre code 
postal: on peut les manipuler c'est à dire les lire, 
les écrire, les déplacer, sans avoir à connaître le 
détail de leur structure interne. Mais aussi on 
peut en extraire les données internes séparé- 
ment. 

L'état d'esprit du GS, c'est de considérer cet en- 
semble de données comme une structure quel- 
conque, un "Record" au sens du langage Pascal. 
De ce fait, nous pourrons utiliser des outils très 
généraux pour manipuler ce "record" comme les 
autres. Pour le ranger en mémoire, on lui al- 
louera un "bloc" repéré par un “handle” (voir 
l'article sur la gestion de la mémoire). 

Tout le GS (comme le Mac) est construit sur ce 
principe. Pour chaque besoin, Apple a défini 
des structures particulières, et a créé des outils 
destinés à les manipuler. 

Par exemple, QuickDraw utilise Cursor (toutes 
les caractéristiques et le dessin du curseur), 
Font (la police de caractères, avec ses données 
accessoires FontGlobalsRecord, FontiD, Fontin- 
foRecord, RomFontRec), GrafPort (la structure 
de base de tout le système graphique), LocInfo, 
PaintParam, PenState, ColorTable, QDProcs (les 
procédures diverses de dessin), etc. 

Lors de l'appel à l'une des fonctions des outils 
du GS, on procède en général à la manipulation 
de l'un des éléments de ces données structurées, 
ou du bloc entier. Les "ressources", en tant que 
structures de données, seront gérées de la même 
manière, avec l'aide d'un outil spécialement 
conçu pour cela: "Resource Manager”. 


>> 
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Types standard et non-standard 


Une ressource est une collection de données 
rangées dans un format défini (c'est la définition 
officielle), ce format étant laissé à l'initiative de 
l'utilisateur. Une ressource est désignée par 
deux numéros: le type (déterminant le format), 
et l'ID (numéro de la ressource dans le type). 


Apple a défini des types de ressources standard 
utilisables par les outils du GS. Il n'y en a actuel- 
lement qu'un petit nombre, mais ils permettent 
déjà de faire beaucoup de choses. Vous trouve- 
rez ainsi parmi les types standard: les chaînes 
de caractères (type Pascal, ou type C}; les blocs 
de texte, de longueur quelconque; les blocs des 
paramètres d'un menu, d'un item de menu, 
d'une fenêtre; le texte d'une fenêtre d'alerte; 
tous les blocs de paramètres des contrôles; des 
icônes; des dessins; des son digitalisés, etc. 
L'emploi de ces ressources standard avec les 
nouveaux outils permet des simplifications 
spectaculaires de l'écriture des programmes. 
Ainsi, le lancement et la fermeture des outils, ou 
la création d'items de menus et de fenêtres, se 
font désormais en quelques minutes! 


Les ressources non-standard peuvent contenir 
tout œæ que vous voulez. Vous pouvez créer 
n'importe quel type de ressource dont vous 
pouvez avoir besoin (ne dépassez pas 64 Ko). A 
vous de définir le format de sa structure (sous 
forme de template, ou de "record" comme en 
Pascal); ensuite vous lui donnez un numéro de 
type de votre choix (pas un numéro déjà pris 
par une ressource standard). Vous mettez ce 
que vous voulez dedans, et vous pouvez ensuite 
confier le colis à ResMgr qui, en bon "chef de 
consigne de la gare", vous rangera votre bien 
dans une case, le couvera de ses soins attentifs 
jusqu'à ce que vous lui redemandiez. 

Nous vous conseillons toutefois de ne créer vos 
propres ressources que quand vous aurez bien 
compris l'utilité et le mode d'emploi des res- 
sources standard. 


La gestion des ressources 


Pour la gestion des ressources sur disque et en 
mémoire, l'outil "Resource Manager” se charge 
de tout. Vous n'avez pas du tout besoin de sa- 
voir de quelle façon les ressources sont rangées 
dans le fichier. ResMgr construit et tient à jour, 
dans le fichier ressources, un "carnet d'adresses" 
(resmap) dans lequel il note, dans l'ordre des 
types et dans l'ordre des ID pour chaque type, 
pour chaque ressource: le type, l'ID, son adresse 
dans le disque, ses attributs de stockage en mé- 
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moire, sa longueur et éventuellement un handle 
sur son adresse dans la mémoire. 

A l'ouverture d'un fichier ressources, ResMgr 
charge en mémoire ce carnet d'adresses. Il en as- 
surera la remise à jour permanente. A la ferme- 
ture du fichier, après avoir recopié les modifica- 
tions de ressources dans le disque, il réécrira ce 
carnet, très souvent à un endroit différent du fi- 
chier. Les ressources elles-mêmes sont écrites un 
peu partout dans le fichier, là où il y a de la 
place. Dans le disque, ResMgr conserve aussi 
tout ce qui lui est utile pour disposer de l'espace 
libre, ici, et là, dans le fichier ressources. Il es- 
saie d'utiliser au mieux les "trous" dans les 
blocs, trouve un endroit pour réécrire une res- 
source qu'on a agrandie, raye une ressource 
supprimée bref fait le ménage et range son coin, 
puis remet au net son carnet d'adresses. Lais- 
sons ResMgr faire son travail, et faisons-lui 
confiance. 


ResMgr peut ouvrir plusieurs fichiers successi- 
vement, les laisser ouverts et rechercher une 
ressource donnée dans l'un ou l'autre de ces fi- 
chiers. Il y a un "ordre de recherche" fonction- 
nant comme une pile: la recherche commence 
par le dernier fichier ouvert, qu'on appelle le fi- 
chier "courant", puis l'avant-dernier, et ainsi de 
suite jusqu'au dernier, qui par principe est le fi- 
chier du système. ResMgr s'arrête quand il a 
trouvé une ressource dont le type et l'ID corres- 
pondent à ce qui lui est demandé. 


Nous avons fait connaissance avec les res- 
sources. Dans un prochain article, nous aborde- 
rons de façon plus précise la façon dont Re- 
source Manager les gère, et comment nous pou- 
vons utiliser les outils qu'il met à notre disposi- 
tion. Maïs d'ores et déjà, vous pouvez aller plus 
loin avec la documentation de ResDoctor, in- 
cluse sur la disquette. je 






GE80: v2.0 ? 


Quelques bugs encore dans le pro- 
gramme GE80 de ToolBox-Mag 4, et 
une erreur classique, dans le fichier de 
démonstration, concernant l'insertion 
de routines machine entre Basic Sys- 
tem et ses buffers (merci à Yvan 
Kænig de l'avoir signalée). 


L'auteur, Mr Régis Mange, travaille à 
une nouvelle version. 


Restez branchés sur ToolBox-Mag. 
JYB 
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Nous avons déjà pris un premier contact avec le lan- 
gage Pascal. Nous allons maintenant avancer un peu 
plus, toujours dans l'esprit d'apprendre à program- 
mer notre GS, à l'aide des outils de la Toolbox. 


Le “langage” de la Toolbox 


Le GS dispose déjà de son propre langage, avec la 
Toolbox. Tous les noms des fonctions, des constantes 
et des paramètres utilisés par les outils sont univer- 
sellement employés, quel que soit le langage de pro- 
grammation : Assembleur, C, ou Pascal. Il est facile à 
tout programmeur de lire et de comprendre les lis- 
tings écrits dans l'un ou l'autre des langages, dès 
qu'ils utilisent la Toolbox. 

Et cela représente un sérieux vocabulaire ! Pour vous 
en convaincre, feuilletez les listings reproduisant les 
units d'interface de votre TML Pascal Il: 150 pages 
uniquement de "déclarations préalables", déjà éta- 
blies afin de nous faire gagner du temps. Tous ces 
noms utilisés pour désigner les éléments de la boîte à 
outils sont autant de mots à votre disposition. 
Lorsque vous programmerez, vous ne cesserez de 
vous y référer. Ce sera pour vous l'équivalent d'un 
dictionnaire orthographique. Beaucoup de ces mots 
proviennent, sans modification, des outils du Mac. 
De sorte qu'en ns. Fun à programmer votre GS, 
vous apprenez en fait aussi à programmer le cousin. 


L'importance des déclarations 


Nous avons déjà signalé l'importance de la question 
des déclarations préalables, qui est la principale diffi- 
culté du Pascal. Le langage Pascal, conçu pour pou- 
voir s'adapter à toutes situations, dispose de possibi- 
lités extrêmement étendues, régies par des règles très 
générales, mais fort abstraites. La pratique montre 
cependant qu'on emploie principalement, sur le GS, 
un nombre restreint de concepts avec lesquels il suf- 
fira de se familiariser. 


En Applesoft, nous n'avons pas à déclarer une va- 
riable ou une constante avant de nous en servir. Il 
suffira d'écrire, par exemple A=40 ou D$-= 
CHR$(4) pour que la valeur 40 soit rangée en mé- 
moire à un emplacement repéré par le nom de va- 
riable À, et que le caractère de code ASCII 4 soit, de 
la même façon, logé quelque part en mémoire, et soit 
ensuite désigné par le nom D$,. 

Nous avons ainsi procédé à la fois à la déclaration de 
la variable et à l'assignation de sa valeur. Seul le signe 
$ nous indique qu'il s'agit d'une variable de type "al- 
phanumérique". L'absence de suffixe au nom de la 
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variable À indique qu'il s'agit d'un nombre réel. 
L'Applesoft a très peu de "types" différents: les 
nombres réels, les nombres entiers, et les chaînes de 
caractères, puis, comme types de données structu- 
rées, les tableaux de valeurs de ces types de base. 
Peut-être vous êtes-vous déjà rendu compte des limi- 
tations de ce procédé: dès qu'on est amené à traiter 
de données un peu complexes, on est obligé de créer 
soi-même des structures spécifiques et d'en organiser 
la manipulation. 

Notez, pour vous consoler, qu'en Assembleur, on est 
encore plus mal logé. On ne peut se référer qu'à des 
zones préalablement définies en mémoire. Seule, 
l'adresse de la zone de mémoire peut être prise en ré- 
férence, sans aucune indication du format de son 
contenu. Il faut énormément de méthode pour s'y re- 
trouver. 

Le Pascal, tout au contraire, a été conçu pour s'adap- 
ter à la manipulation de tous les genres de données 
possibles et imaginables, à la seule condition d'indi- 
quer avec précision, au préalable, les règles adoptées, 
cela au moyen de "déclarations". 

Pascal est très pointilleux. La plupart de vos ennuis 
en Pascal viendront d'une compréhension insuffi- 
sante de la terminologie des déclarations et de 
l'emploi des types. Nous devons donc, avant d'aller 
plus loin, aborder un minimum de notions théori- 
ques concernant le langage. 


Les mots réservés du Pascal 


Comme toute langue, le Pascal est composé de 
“mots”, appelés ici tokens. Au moment de la compi- 
lation, le Pascal doit effectuer la reconnaissance de 
ces mots. Il les classe alors en plusieurs catégories: 


1. Les séparateurs et opérateurs, composés d'un ca- 
ractère(+-/*=<>[].,()::1@1{})ou 
de deux caractères (<> <= >= := .. (* *) ) 


2. Des mots-clés, mots réservés ne devant pas être 

utilisés pour autre chose que leur emploi précis: 

+ mots-clés réservés aux déclarations: const / var / 

type / array / record / set / file / label / packed of 

+ mots-clés réservés au déroulement du programme: 
if. then … else Case of … otherwise 


repeat … until While. do 
for … to for … downto 
goto with … do 


+ mots-clés réservés à la structuration du pro- 
gramme: procedure / function / program / begin / 
end / implementation / interface > 
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* mots-clés servant d'opérateurs: and / or / div / mod 
lin/not 
+ mot-clé spécial désignant une valeur nulle: Nil 


3. Des directives. Ce sont des mots-clés qui ne sont 
pas propres au Pascal en général, mais à votre com- 
pilateur. TML Pascal IT reconnaît les directives sui- 
vantes: EXTERNAL, FORWARD, INLINE, TOOL 


4. Des identificateurs. Ce sont les noms qui sont 
donnés aux constantes, aux types, aux variables, aux 
procédures, aux programmes, aux units, aux para- 
mètres, etc, au moment de leur déclaration. Nous 
utiliserons souvent "nom d'identification" ou tout 
simplement "nom", pour désigner la même chose. 
Beaucoup d'identificateurs sont déjà définis: certains 
désignent des procédures ou fonctions standard du 
Pascal; d'autres ont été déclarés dans les units d'in- 
terface et désignent des procédures, fonctions, cons- 
tantes, paramètres, des divers outils du GS. Les 
autres identificateurs, nous les créerons nous-mêmes 
au fur et à mesure des besoins. 

Chaque nom d'identification est une chaîne de 255 
caractères maximum, composée de lettres, de chiffres 
et éventuellement du caractère "_! (souligné), parfois 
employé pour remplacer l'espace qui est interdit. 
Tous les caractères sont reconnus (contrairement au 
Basic dans lequel seuls les deux premiers caractères 
sont significatifs). Le premier caractère est forcément 
une lettre. Le compilateur ne fait pas de différence 
entre majuscules et minuscules. 

Exemples de noms d'identification choisis dans la 
Toolbox: moveTo; NewHandle; GetCHHandleFromID; 
Quelques autres exemples de noms possibles: B672; 
a3; LeNomDuProgrammeur; la_procedure_2; 


NB: Depuis quelque temps, Apple tend à ne plus uti- 
liser "_" comme séparateur, mais à insérer des majus- 
cules dans les noms. L'habitude s'installe aussi de 
faire figurer devant chaque nom une ou deux lettres 
de reconnaissance indiquant la provenance de la dé- 
claration: gwindowl, gmemoryID, gMainEvent, dési- 
gnent des variables globales; kAppleMenuRef, kCon- 
trollD, désignent des constantes. TEGetSelectionStyle, 
TEKill, TEPaste, désignent des fonctions de l'outil 
TextEdit, etc. 

On a beaucoup coupé-collé pour programmer le GS, 
à partir d'exemples Apple ou TML faits pour cela, et 
les noms anglais sont restés. Employer des noms 
français est cependant souhaitable: ils se distinguent 
ainsi des noms employés par Apple dans la Toolbox. 


5. Des nombres. Le compilateur reconnaîtra un mot 
comme étant un nombre s'il est exclusivement com- 
posé de chiffres et de quelques caractères autorisés, 
reconnaissables sur les exemples suivants: 

43; +6744; -17.6; 12E4; 8.53206; 123E-7; $14FC 

Ces nombres pourront être utilisés comme des va- 
leurs de constantes ou de variables appartenant à 
des types divers. Cela n'est guère différent du Basic, 
sauf en ce qui concerne les nombres hexadécimaux 
qui, précédés du signe $, sont reconnus par le Pascal. 


6. Des étiquettes (labels). Une étiquette, c'est un 
groupe de quatre chiffres au maximum (de 0 à 9999). 
Il servira à définir un point d'entrée dans le pro- 
gramme, à la suite d'une instruction gofo. Absolu- 
ment comme le numéro de ligne qui suit, dans le 
Basic, une instruction Goto. 
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En Pascal, une étiquette n'est pas un nombre. On ne 
peut donc pas faire d'opération arithmétique sur une 
étiquette.Vous n'emploierez que très rarement des 
étiquettes. 

7. Des chaînes de caractères (strings). Nous en avons 
déjà parlé. Elles sont encadrées par le signe " (apo- 
strophe). Exemples: “Pascal”; PARIS"; "C'est bien”. Si 
on veut utiliser une apostrophe dans une chaîne, il 
faut la doubler (‘C''est bien‘). La chaîne pourra être 
utilisée comme une constante ou une variable. 


Les déclarations du Pascal 


Le principe, déjà évoqué, est le suivant: avant d'em- 
plover un identificateur, il faut en avoir fait la décla- 
ration, c'est-à-dire avoir décrit, suivant une règle pré- 
cise, ce que désignera ce nouveau nom. Ainsi le com- 
pilateur pourra par la suite le traiter comme il 
convient. Voici un exemple de déclaration de va- 
riable: var laChaine: str255; 
Le mot var indique qu'une ou plusieurs déclarations 
de variables vont suivre; laChaïine est l'identificateur 
de la nouvelle variable. Après le séparateur :, le nom 
str255 est l'identificateur du type de la variable. 
Pour que cette déclaration soit valable, il faut que le 
type str255 ait été auparavant lui-même déclaré. 
Vous retrouverez cette déclaration parmi celles de 
l'unit "Types" du TML IT: 
type  String255 = string[255]; 

str255 = String255; 
Le mot type précède obligatoirement les déclarations 
des types. Ici, plusieurs formes différentes ont été dé- 
finies pour le même type: ce type particulier est ex- 
trêmement courant, et les programmeurs sont habi- 
tués à différentes désignations. 
Cet exemple montre comment tout type doit être dé- 
fini, à partir d'un autre type déjà existant. Au départ, 
Pascal ne connaît qu'un très petit nombre de types. 
Tous les autres sont construits au fur et à mesure à 
partir de là, au moyen de déclarations successives, ce 
qui ouvre des possibilités immenses. 


Les cinq genres de déclarations 


Pascal reconnaît cinq "sections" de déclarations: dé- 
clarations d'étiquettes (labels), de constantes, de 
types, de variables, de fonctions et procédures, avec 
une syntaxe bien définie. Nous nous contenterons 
d'exemples usuels. 


1. Déclaration des étiquettes. 
Mot-clé: label. Séparateur: 
Exemples: label 3; (un seul label déclaré) 

label 14,285,12; (trois labels) 
Notez, à la fin de chaque déclaration, comme à la fin 
de toute ligne d'instruction Pascal, le séparateur ;. 
Remarquez également qu'on peut déclarer successi- 
vement plusieurs étiquettes, en les séparant par des 
virgules. Cette facilité se rencontrera dans la plupart 
des déclarations. 


2. Déclaration de constantes 

Mot-clé: const. Séparateur: = 

Une constante peut être soit un nombre, soit une 
chaîne de caractères, soit une autre constante dési- 
gnée par son identificateur. Une fois la valeur attri- 
buée, il n'est plus possible d'en changer. 

Syntaxe:  identificateur = valeur; 

Exemple: const Pi= 3.14159; Œ 
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reflsHandie = $0001; 
KkString1 = "Pascal"; 
Un très grand nombre de constantes ont déjà été dé- 


finies par Apple pour les outils de la Toolbox. Vous 
les trouverez dans les units d'interface. 


3. Déclaration de types 

Mot-clé: type. Séparateur: = 

Syntaxe:  identificateur = le type de donnée; 
Exemple: type byte = 0.255; 


4. Déclaration de variables 

Mot-clé: var. Séparateur: : 

Syntaxe:  identificateur : type; 

Exemples: wr  x,7,2:integer; 
laChaine : str255; 
gMainEvent : EventRec; 


5. Déclaration de fonctions 

et de procédures 

Mots-clés: function, procedure. Séparateurs: () ; : 
Exemple: procedure Moveto (h: integer; v: integer); 
Cette procédure comporte deux "paramètres": H et v, 
qui sont déclarés, comme le seraient des variables, 
(en indiquant l'identificateur et le type) à l'intérieur 
de la parenthèse. Exemple: 

function GetHandleSize (theHandle: handle): integer; 


La fonction se déclare comme la procédure, mais se 
termine par l'indication du type du résultat qu'elle 
fournit, précédée du séparateur :. 

Notez qu'il n'y a pas de point-virgule après la der- 
nière déclaration de paramètre à l'intérieur de la pa- 
renthèse. 


Vous trouverez de nombreux exemples de déclara- 
tions de fonctions et procédures dans les units d'in- 
terface. En cas de doute sur la syntaxe, piochez dans 
les listings de ces units. 


Blocs de programme 
et portée d'une variable 


Pascal est un langage modulaire: tout programme 
écrit se décompose en blocs. Chaque bloc doit est 
composé de deux parties essentielles: les déclarations 
et les instructions. 


Les déclarations apparaissent généralement dans 
l'ordre logique suivant: étiquettes, puis constantes, 
puis types, puis variables, enfin fonctions et procé- 
dures . La séquence des instructions commence par 
begin et se termine par end. 


Dans un programme, les "blocs" peuvent s'imbriquer 
les uns dans les autres. Le programme lui-même 
constitue un "bloc", qui recouvre tout l'ensemble des 
autres blocs. C'est pourquoi les déclarations effec- 
tuées dans ce bloc portent le nom de "globales". 
Chaque procédure ou fonction constitue aussi un 
"bloc", avec ses propres déclarations, qui sont "lo- 
cales", et sa séquence d'instructions. 

A l'intérieur du bloc d'une procédure, on peut très 
bien trouver d'autres blocs, par exemple des procé- 
dures ou fonctions dites "locales", utilisées seulement 
par la procédure principale. 


Tous les identificateurs déclarés dans un bloc ont 
une portée locale limitée à ce bloc. Cela signifie 
u'on ne peut s'y référer que de l'intérieur de ce bloc. 
es identificateurs n'ont pas de signification pour les 
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procédures et fonctions extérieures au bloc. 

De même, les déclarations faites en début de pro- 
gramme, appartenant au bloc du programme, ont 
une portée globale. Les identificateurs peuvent être 
alors utilisés d'un point quelconque du programme. 
On parle ainsi de variables ou constantes "globales" 
ou "locales". On peut employer le même nom d'iden- 
tification pour des variables locales appartenant à 
des blocs différents. 


Une erreur fréquente consiste à déclarer, comme 
nom de variable locale, un nom déjà précédemment 
employé pour déclarer une fonction globale. Prenez 
le soin d'utiliser, pour vos variables locales, toujours 
les mêmes noms, qui deviennent en quelque sorte 
des "variables à jeter". 

Dans les programmes américains, on rencontre ainsi 
souvent le suffixe "temp" à la fin du nom d'une va- 
riable temporaire. Pour ma part, j'utilise des noms de 
variables locales très courts, comme ‘“a,b,c,d,….L, 
x,y,z" pour désigner des nombres et "s1,52,53..." pour 
désigner des chaînes. Pour des variables de types 
moins courants, je reprends souvent le nom du type 
précédé de un article “le”, ou “la”, ou par “mon” ou 
"ma". Exemples: 

var ab: integer; s1,52: str255; leNameRecGS: Name- 
RecGsS; 


Lorsque des noms d'identification ont été déclarés 
dans la section des déclarations globales d'une Unit, 
si l'Unit fait partie de la liste figurant à la suite du 
mot uses en début de programme, ils sont globaux 
pour le programme. 


Les types standard 


Le mot “type” définit le genre de données qui est dé- 
signé par un identificateur. Chaque variante du lan- 
gage Pascal définit un nombre restreint de types 
Standard. Ensuite les utilisateurs peuvent à leur tour 
définir un grand nombre d'autres types, en fonction 
des besoins. 

Nous reprendrons ici les types standard du langage 
TML Pascal II, qui sont pratiquement les mêmes que 
ceux des autres variantes de Pascal GS. Ils sont clas- 
sés en cinq catégories: les types simples, les types 
structurés, les types "chaînes", les types "pointeurs", 
les types "objets". 


1. Les types simples 


1.1. Types ordinaux standard. 

Il y a quatre types standard de base, qui existent 
dans toutes les versions du Pascal: Integer, Longinte- 
ger, Boolean, Character. 

+ Integer désigne un nombre entier, positif ou néga- 
tif, pouvant être stocké en mémoire sur deux octets, 
compris entre -32 768 et +32 767. Souvent désigné 
par word (mot) dans d'autres langages et les ou- 
vrages de référence Apple, c'est l'élément de base des 
nombres en Pascal. Notez qu'un nombre écrit sur un 
seul octet (byte) n'est pas un type standard . 

+ Longint désigne un nombre entier long, positif ou 
négatif, pouvant être stocké sur 4 octets en mémoire. 
Sa valeur est comprise entre -2 147 483 648 et + 2 147 
483 647. 

Les fonctions LoWrd et HiWrd, que nous utiliserons 
souvent dans les boucles d'événements du GS pour 
prendre les renseignements fournis par Task- > 
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Master, permettent de "sortir" chaque moitié de ce 
longinteger: le high word, le mot de poids le plus éle- 
vé, et le low word, le mot de poids le plus bas. 

+ Boolean, donnée logique pouvant prendre soit la 
valeur false (faux), soit la valeur frue (vrai). De 
même qu'en Basic, on peut convertir true et false en 1 
et 0. Pour transformer la donnée logique en un type 
numérique, on utilise la fonction de conversion 
ord(..): ord(false) vaut 0, et ord(true) vaut 1. 

+ Char désigne un seul caractère. Il peut être stocké 
en mémoire sur un seul octet, qui prend alors la va- 
leur du code ASCII du caractère. Cette forme de stoc- 
kage est réservée aux chaînes de caractères et aux ta- 
bleaux et records "compactés". Dans les autres cas, le 
Pascal emploie deux octets de mémoire. 

De la même façon que ci-dessus, on peut manipuler 
le code ASCII du caractère comme une donnée nu- 
mérique en employant la fonction logique ord..); 
ord("A'), par exemple, désignera le nombre 65, code 
ASCII de ‘A’, ce qui correspond à la notation en Basic 
ASC("A"). 

Comme en Basic, on trouve la fonction inverse: 
Chri..) (mais sans le signe $) pour transformer un 
code ASCII en un caractère; Chr(65) représente la 
lettre 'A'. 

1.2 Les types ajoutés 


1. Enumération: c'est le contenu d'un ensemble, sous 
forme de liste énumérée dans un ordre défini. On ap- 
pelle "ordinalité” le numéro d'ordre de l'élément 
dans la liste (en commençant par 0). Même si les ob- 
jets énumérés ne sont pas quantifiables, leur valeur 
"ordinale" peut donner lieu à des comparaisons. 
L'élément peut être n'importe quoi. Par exemple: 
couleur : (rouge, vert, bleu, blanc, jaune); 
Cette déclaration concerne un type dont l'identifica- 
teur est couleur, et qui est défini par ses composants 
possibles: à la suite de la déclaration, seules les cinq 
couleurs désignées pourront appartenir à ce type. 
L'énumération de l'ensemble porte aussi parfois le 
qualificatif de "scalaire", si l'ensemble peut être classé 
dans un ordre défini. 
Certaines fonctions du Pascal permettront d'opérer 
sur les valeurs ordinales. Ainsi, dans cet exemple, 
ord(rouge) désigne le numéro d'ordre du rouge, c'est- 
à-dire 0. On pourra écrire: ord(vert) < ord(blanc}; cette 
expression aura une valeur booléenne true. 
Il existe aussi les fonctions pred() (précédent élé- 
ment) et succ( ), (élément suivant). Ainsi pred(jaune) 
= blanc et succ(vert) = bleu. 
Je vous laisse le soin d'imaginer tous les développe- 
ments possibles de ce principe. En général, une énu- 
mération désignera plutôt un ensemble de nombres, 
comme: 0,1,2,3,5. 


2. Intervalle (SubRange). Un intervalle est un 
groupe d'éléments successifs prélevés dans une énu- 
mération. On le désigne par deux bornes: le premier 
et le dernier élément, séparés par deux points succes- 
sifs. Exemples: 

1.100 ; 128 .. 127; vert .. blanc 

Les deux bornes doivent être écrites dans le bon 
ordre: la valeur ordinale de la première doit être in- 
férieure à la valeur ordinale de la seconde. 


3. Real (Nombre réel). Les nombres réels peuvent 
s'écrire sous leur forme numérique habituelle, par 
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exemple 3.14159 (notez que le point re as la vir- 
gule décimale en Pascal comme en Basic) ou en "no- 
tation scientifique", toujours comme en Applesoft. 
TML Pascal II utilise quatre types différents de réels: 
e le type single ou real qui utilise quatre octets de 
mémoire, et correspond à un nombre compris entre 
1.4E-45 et 3.4E38, ce qui correspond à des nombres 
comportant 7 ou 8 chiffres significatifs. Cette préci- 
sion est largement suffisante pour les cas courants de 
calcul technique ou scientifique. 

le type double, qui demande huit octets en mé- 
moire, et fournit des nombres jusqu'à 15 et 16 
chiffres significatifs. 

° le type extended, stocké sur dix octets de mémoire, 
permet des nombres de 19 à 20 chiffres significatifs. 

e enfin, le type Comp ou Computational, stocké sur 
huit octets, et fait pour l'emploi des grands nombres 
en système décimal. 


Vous trouverez tous les renseignements utiles sur 
ces nombres dans la documentation officielle: Apple 
Numerics Manual, qui traite du SANE (Standard 
Apple Numerics Environment). 

Remarquez que de très nombreux calculs peuvent se 
faire avec des nombres entiers de type integer ou 
longinteger, même des calculs comptables: il y a des 
astuces, par exemple travailler en nombres entiers de 
centimes, et procéder à des divisions par 100 au mo- 
ment de l'affichage, par un simple traitement de la 
chaîne de caractères. Les calculs sont alors beaucoup 
plus faciles et plus rapides. 


2. Les types structurés 


Nous rentrons maintenant dans une partie impor- 
tante pour la programmation du GS, car nous ren- 
contrerons une foule de données structurées utilisées 
par la Toolbox. Surtout sous forme de records, qui 
peuvent prendre les aspects les plus variés. 

Les s structurés du Pascal comprennent les ta- 
bleaux (arrays), les records, les ensembles (sets), les 
files (mot anglais mal traduit par "fichier"; nous em- 
ploierons plutôt le mot français "file"), les chaînes 
(strings), les pointeurs (pointers). 

Chacun de ces types peut exister sous sa forme nor- 
male ou sous forme “compactée" (packed). Quand la 
forme compactée est employée, les données qui de- 
vraient être stockées normalement sur un octet 
(comme les bytes ou les characters) n'occupent effec- 
tivement qu'un octet en mémoire. Sinon, chaque 
donnée occupe deux octets en mémoire. (Cette possi- 
bilité ne joue en fait que pour les tableaux et les Re- 
cords. Déclarer un autre type structuré comme com- 
pacté ne change rien à son stockage en mémoire.) 


2.1. Les Tableaux 


Il y a une très grande analogie entre les tableaux du 
Basic et ceux du Pascal. Les tableaux du Basic de- 
vaient aussi être "déclarés" , en fait "dimensionnés”" 
au moyen des instructions DIM (...), afin de réserver 
leur emplacement en mémoire. Au lieu des paren- 
thèses du Basic, le Pascal emploie des crochets. Mais 
pour le reste, la désignation est similaire. 

En Pascal, on peut loger dans les tableaux des don- 
nées extrêmement variées, comme des "records" 
complexes. Toutefois, toutes les données d'un ta- 
bleau doivent avoir le même type. Le nombre pos- 
sible d'éléments est fixé dans le libellé du type JB 
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au moment de la déclaration de la variable. Exemple: 
array [1 .…. 100] of Real: tableau de 1 à 100 nombres ré- 
els. Entre les crochets figure le type de l'index", qui 
est forcément un type "ordinal”. 

Généralement, on trouve une énumération, ou, 
comme ici, un intervalle. Mais ce n'est pas forcé, On 
peut très bien employer un identificateur de type dé- 
fini précédemment, par exemple: 

packed array [couleur] of Boolean. 

Ce tableau pourra comporter autant d'éléments que 
le type couleur. 


On peut avoir bien évidemment des tableaux à plu- 
sieurs entrées. Les divers index sont alors déclarés, 
dans la déclaration de type, dans l'ordre souhaité, sé- 
arés par des virgules (comme en Basic). Ainsi array 
[1..20, 1.10] of integer représentera un tableau de 
nombres entiers, à double entrée, le premier index 
acceptant des valeurs de 1 à 20, et le second de 1 à 
10. 
L'utilisation des tableaux dont les index ne sont pas 
des nombres simples n'est pas toujours facile à inter- 
préter dans les sources, aussi est-il bon d'en réserver 
l'emploi à des utilisateurs très confirmés. 


Emploi des tableaux. Une fois qu'une variable de 
type tableau à été déclarée, on peut l'utiliser pour as- 
signer des valeurs à ses éléments, et employer ces va- 
leurs, comme toute autre variable. Prenons un 
exemple simple: déclarons une variable de type ta- 
bleau: var Age : array [1 .. 100] of integer; 

La désignation d'un des éléments du tableau se fera 
en faisant suivre l'identificateur du tableau par la va- 
leur de l'index, entre crochets. Ainsi Age {11] dési- 
gnera le onzième élément du tableau, dans la suite 
des instructions. On pourra écrire par exemple, pour 
"remplir" les cases du tableau: 

Agel1] := 17; Agel2] := 21; Agel2] := 9;etc 

Même principe pour utiliser les données du tableau: 
if Age la] > 17 then majeur := true; 


Remarque: Nous ne pouvions, en Basic, traiter que les 
données élémentaires d'un tableau. En Pascal, le ta- 
bleau entier lui-même constitue une variable utili- 
sable comme une autre. On pourra ainsi la déplacer 
en bloc dans la mémoire. Ou bien en faire l'un des 
éléments d'une donnée structurée plus complexe, 
comme un record. 


2.2 Les Records 


La traduction du mot record par enregistrement res- 
treint le sens de son emploi en Pascal. Nous préfère- 
rons conserver le mot anglais, dans l'acceptation que 
lui donne le Pascal: un ensemble fixe de données ap- 
pelées fields (champs), les “champs” pouvant être de 
sens différents. Dans ce qui suit, nous utiliserons 
plus souvent le mot “élément” ou même "paramètre" 
pour désigner l'un des champs d'un record. En effet, 
dans la programmation du GS, la principale utilisa- 
tion des records est la constitution de blocs de para- 
mètres destinés aux fonctions des outils de la Tool- 
box. 

Le record est une structure extrêmement souple, ca- 
pable de s'adapter à bien des situations. Pour vous 
en rendre compte, parcourez les listings des units 
d'interface, et voyez combien de types de records dif- 
férents ont été définis, beaucoup comportant même, 
comme élément, un ou plusieurs autres records. C'est 
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également ce genre de structure que nous rencontre- 
rons dans les formats des ressources qui ont été créés 
pour la manipulation de ces données. 

Nous prendrons comme exemple l'un des records 
définis pour QuickDraw2: LocInfo, employé pour dé- 
finir un GrafPort. Déclaration du type de record: 

type LocInfo = Record 

portSCB : integer; 

ptrToPixImage : ptr; 

width :integer; 

boundsRect : rect; 

end; 

Dans cette déclaration, on trouve d'abord l'identi- 
fiant de la variable, LocInfo; puis, suivi du mot-clé 
Record, la liste des champs du record, chaque cham 
étant déclaré comme une variable ordinaire: identifi- 
cateur: type; le mot-clé end indique la fin de la décla- 
ration. 


Les identificateurs de chacun des champs peuvent 
reprendre des noms déjà utilisés par ailleurs, car ils 
n'auront, aux yeux du compilateur, un sens précis 
que s'ils sont rattachés au nom du record lui-même. 
De ce fait de nombreux éléments de records diffé- 
rents portent le même nom de champ. Mais vous ne 
devez pas utiliser deux fois le même identificateur 
dans un même record, cela va de soi. 

Notez que ce record fait appel à des éléments de 
types variés. Le dernier élément, boundsRect, qui dé- 
signe le rectangle limite du grafport, est lui-même un 
record, de type rect (rectangle), comportant quatre 
éléments, les positions de chacun des côtés. 


Emploi du type. Ce type que nous venons de définir 
pourra être utilisé dans la déclaration d'une variable. 
Par exemple: var le Locinfo: LocInfo; 

Cela signifie que nous désignerons par l'identifica- 
teur leLoclnfo, une variable de type Locinfo. Pour le 
compilateur, ce sera un ordre de réservation pour un 
emplacement en mémoire, taillé sur mesure pour re- 
cevoir la totalité du record, soit 16 octets: 


portSCB : entier 2 octets 
prToPixImage : pointeur 4 octets 
width : entier 2 octets 
boundsRect : rectangle (4 integers) 8 octets 


Notez que ce travail de réservation en mémoire, le 
compilateur le fera avec ses propres moyens, sans 
que nous ayons à nous en occuper. Il a prévu des 
zones spéciales pour cela, différentes selon que cette 
variable est globale ou locale. S'il s'agit d'une va- 
riable locale, elle sera placée dans la pile, à titre très 
provisoire, et effacée dès qu'on n'en aura plus besoin. 


Utilisation des données. On peut accéder à chaque 
champ du record en le désignant par l'identificateur 
du record, suivi d'un point, puis du nom de champ. 
Par exemple, leLoclnfo.PortSCB désignera le champ 
PortSCB de notre record leLocInfo. On pourra utiliser 
cette locution comme le nom d'une variable ordi- 
naire. De même leLoclnfo.Width désignera le champ 
Width, et leLocinfo.BoundsRect.top désignera le 
champ fop (ordonnée du côté haut du rectangle} du 
BoundsRectangle de leLocInfo. 


Entrée des données. Nous dis ns de deux 
moyens. Le premier consiste simplement à faire des 
assignations” successives sur chacun des champs à 
valoriser. Par exemple: > 
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leLocinfo.portSCB := getCurPort; 
leLocInfo.ptrToPixImage := @Monlmage; 
leLocinfo.width := 640; 
leLocinfo.BoundsRect := rectanglel; 


Nous disposons aussi d'un moyen plus rapide d'écri- 
ture, grâce à l'instruction with..do: 
with leLocInfo do begin 

portSCB := getCurPort; 

ptrToPixImage := @Monlmage; 

width := 640; 

BoundsRect := rectanglel; 
end; 
With peut aussi être employé pour utiliser une don- 
née déjà valorisée. Par exemple: 
with leLocInfo.BoundsRect do 
if rectanglel.Top > 40 then TropGrand := true; 
Remarquez qu'avec with, le nom du champ est dé- 
barrassé de l'identificateur du record. Alors, atten- 
tion: si vous avez pris un nom qui est aussi celui 
d'une variable globale, le compilateur risque de ne 
pas savoir ce dont il s'agit. 


Pour manipuler en bloc le record entier, on utilise 
simplement le nom du record comme une variable. 
En général, cette manipulation se fera à propos de la 
position en mémoire du record, et on la traitera plu- 
tôt en employant un pointeur sur le record, ou encore 
plus généralement au moyen d'un handle si nous 
avons nous-même défini le bloc de mémoire occupé 
par ce record. 


2.3. Les Ensembles (Sets) 


Ils sont bien moins employés dans la programmation 
du GS que les autres types structurés. Un type "en- 
semble", doit être déclaré sous la forme set of suivi 
d'un type ordinal (type de base). Par exemple: set of 
0..100, set of char. 


2.4. Les Files 


Un type file est une suite linéaire de composants 
d'un même type. Il n'y a pas de nombre de compo- 
sants défini dans la déclaration. L'emploi principal 
de ce type réside dans les "files de caractères”. Sous 
forme compactée, une file de caractères prend le 
nom particulier de Text, forme très utilisée dans les 
instructions d'entrée et sortie du Pascal. 

La déclaration du type se fait sous la forme (packed) 
file of suivi du nom du type des composants. 

Il n'existe pas de moyen direct pour manipuler les 
composants d'une file. On doit écrire les instructions 
voulues pour trouver le composant. 


2.5. Les Chaînes (strings) 


Une chaîne est une suite de caractères représentés 
chacun par un octet, et dont le premier octet indique 
le nombre de caractères de la chaîne. Ce type de 
chaîne est communément appelé "Chaîne Pascal”. 
C'est en fait une packed file of char un peu spéciale, 
qui bénéficie d'un mode d'accès direct pour chacun 
de ses composants. Le nombre d'octets est limité à 
255 (comme en Basic). 


Il existe d'autres types, non standard, de chaînes: par 
exemple la "chaîne C" (CString), qui ne comporte pas 
d'octet de longueur au début, mais un 0 à la fin, et la 
chaîne de type étendu" ou GSString qui comporte au 
début un integer à la place de l'actet de longueur, ce qui 
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ne limite plus sa longueur à 255. Ce type de chaîne est 
ubilisé communément par les nouveaux outils du GSOS. 


On peut déclarer des types de chaînes Pascal de 
moins de 255 caractères de longueur. Par exemple, si 
on veut manipuler des noms de fichiers qui ne dé- 
passeront jamais une quinzaine de caractères, il n'est 
pas nécessaire de réserver l'espace pour 255 carac- 
tères, ce qui encombre la pile. 


Exemple de déclaration de ype chaîne: 
type str32 = string [32]; 

Le nombre de caractères souhaités se trouve à droite, 

entre crochets. 


Emploi des chaînes. On déclarera les variables 
chaînes comme toute autre variable. Par exemple: 

var laChaine : str255; 
Pour donner à une variable chaîne sa valeur, on fera 
une assignation , et le texte à écrire sera inclus entre 
des apostrophes, comme pour une constante-chaîne. 
Exemple:  laChaine := ‘Pascal; 


Pour accéder à chaque élément d'une chaîne Pascal, 
on dispose d'un moyen très commode. Le mode 
d'écriture est le même que si la chaîne était un packed 
array of char. Ainsi: 
laChaine[1] désigne le 1er caractère 'P", 
laChaine[2] désigne le 2ème caractère ‘a’, 
laChainel3] désigne le 3ème caractères’, 


… Etc... 
De plus le code ASCII du caractère laChainelO] dé- 
signe la longueur de la chaîne. On écrira: 

lalongueur := ord(laChaine[O]}; 
laChainel0] désigne le premier octet du bloc de mé- 
moire occupé par laChaine. La valeur de la longueur 
sera 6. C'est le nombre de caractères et non le nombre 
d'octets occupés en mémoire par la chaîne, qui est de 7. 
Si nous voulons accéder à ce bloc au moyen d'un 
pointeur, nous écrirons: 

lepointeur := @laChaine; 
Ce pointeur sera l'adresse du caractère zéro de la 
chaîne en mémoire. Si nous voulions (par exemple 
pour transférer cette donnée vers un buffer d'impri- 
mante) pointer sur le premier caractère de la chaîne, 
il suffirait d'écrire: 

lepointeur := @laChainel[1]; 
Vous trouverez des explications sur les pointeurs et 
handles dans l'article sur la gestion de la mémoire de 
cette série. 
Autres fonctions agissant sur les chaînes. Puisque 
nous sommes dans les chaînes, profitons-en pour ci- 
ter quelques fonctions très utiles permettant de les 
manipuler. 
+ Length(str) fournit un integer, le nombre de carac- 
tères de la chaîne (comme en Basic). 
« ConcaH{str1,str2,.…) fournit une chaîne qui est la 
concaténation (c'est-à-dire la mise bout à bout) de 
plusieurs chaînes. Equivalent de A$ = A1$ + A2$ en 
Applesoft. 
« Copylsource, index, count) retourne count caractères 
de la chaîne source, prélevés à partir du caractère de 
numéro index. Identique au MID$(..) du Basic. 
° Pos (‘mot”, str) recherche la petite chaîne mot à l'in- 
térieur de la chaîne sfr, et retourne le numéro 
d'ordre du premier caractère de mot. Cette fonction 
n'existait pas en Applesoft. 

Le 
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Mentionnons enfin deux procédures également in- 
connues en Applesoft: 

° Delete(str, index, count) supprime count caractères 
x là chaîne str à partir du caractère du numéro in- 

ex. 

° Insert(source, dest, index) ajoute dans la chaîne dest, 
la chaîne source, en l'insérant à partir du caractère 
numéro index. 


2.6. Les types Pointeurs 


Une variable de type pointeur contient l'adresse en 
mémoire d'une variable dynamique (c'est à dire sus- 
ceptible d'occuper des positions différentes en mé- 
moire). Le de la variable "pointée" s'appelle le 
"type de base”. On peut ainsi construire, en Pascal, 
des types de pointeurs très variés, correspondant 
chacun à un type de base déterminé. Car un pointeur 
ne sert pas à grand-chose si on ne sait pas ce qu'il dé- 
signe. Le Pascal utilise un moyen simple (peut-être 
trop simple) pour prélever une donnée à l'adresse in- 
diquée par un pointeur. De sorte que si on ne précise 
pas, il est capable de lire n'importe quoi. Si le poin- 
teur a un type bien précis, le Pascal prélèvera la don- 
née du format précisé par le type de base de ce poin- 
teur. 
Exemple de déclaration de type pointeur: 
type string255ptr = fstring255; 
Pour “fabriquer” un de pointeur, nous avons 
ajouté, devant le nom du type de base, un "circon- 
flexe" qui transforme ce nom en celui d'un pointeur. 
Ce circonflexe se lit "pointeur vers”, Il a la même 
fonction que le signe @, qui permet de créer un poin- 
teur vers une variable Pascal existante. Nous pour- 
rions écrire ceci: 
var  lePointeur: 
laChaine: 
begin 


lePointeur 


us. 


string255ptr; 
string255; 


:= @laChaine; 


Utilisation des pointeurs. Le signe * (circonflexe) 
placé devant un identificateur de variable signifie 
"pointeur vers” la position, en mémoire, de cette va- 
riable. Plus précisément, il s'agit de l'adresse en mé- 
moire du premier octet du bloc occupé par cette va- 
riable. 

Le même signe placé à la fin de l'identificateur d'une 
variable de type pointeur désigne le contenu de la 
variable. 

Dans CARE précédent, lePointeur” désignera le 
contenu du bloc de mémoire pointé par la variable 
lePointeur, c'est-à-dire la variable laChaine. Vous 
comprenez il était nécessaire que le type de 
la variable lepointeur soit précisé, si on veut que le 
contenu du bloc qu'il désigne le soit aussi. 


Dans le GS, on utilise beaucoup les handles qui sont 
des pointeurs vers d'autres pointeurs. Les pa 7 res- 
tent écrits à des endroits fixes de la mémoire. Ils 
contiennent l'adresse (c'est-à-dire le pointeur) ac- 
tuelle du bloc de mémoire correspondant. Vous ren- 
contrerez donc parfois l'emploi de deux circonflexes 
successifs: par exemple leHandle" désignera la don- 
née se trouvant dans le bloc de mémoire (dynami- 
que, donc mobile) géré par leHandle. Il existe ainsi 
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toute une gamme de fypes de handles, pratiquement 
un par type de donnée de base. 


La constante Nil. La constante Nil est un pointeur 
universel" de valeur nulle, que le compilateur du 
Pascal accepte à la place de n'importe quel autre type 
de pointeur (ou de handle puisque un handle est un 
pointeur). 

Elle est très employée dans la programmation du GS, 
car Apple lui donne souvent une signification parti- 
culière, en tant que paramètre dans l'appel d'une 
fonction de la Toolbox. 


Compatibilité des types. Pour qu'une instruction 
puisse être compilée, il faut que les types employées 
par les variables utilisées soient "compatibles". Par 
exemple, une "assignation", qui fixe la valeur d'une 
variable, doit comporter, de chaque côté du signe := 
des éléments de types "compatibles", Dans variablel 
:= variable2, le type de la variable? est exactement le 
même que celui de la variablel, il y a "identité" des 
s. Donc ils sont compatibles. 

S'il s'agit de types très usuels comme des nombres, il 
peut y avoir de nombreux cas de compatibilité. Par 
exemple si variablel est un longinteger, et variable2 
un integer, il n'y aura aucun problème. De même 
pour les chaînes si variable] est de type str255, et si 
variable? est de type str32. 


Les règles générales de compatibilité sont assez indi- 
gestes. Mais le compilateur est extrêmement cha- 
touilleux sur cette question, et annonce une erreur 
chaque fois qu'il y a incompatibilité: la pratique vous 
apprendra donc très vite les bévues à éviter. 


Changement de type (Cast). Dans la plupart des 
cas, vous trouverez facilement la cause de votre er- 
reur, et vous la corrigerez. Parfois, il vous suffira 
d'opérer un "changement de type" (cast) , permis par 
certaines versions de Pascal, dont le TML II. 

Par exemple, si le compilateur attend comme para- 
mètre d'une fonction un pointeur de type ordinaire, 
et si vous lui fournissez un pointeur nommé mon- 
Pointeur de type String255ptr, il vous le signalera en 
stoppant la compilation à cet endroit et en vous en- 
voyant un message d'erreur explicite. Il vous suffira 
d'opérer un changement de type en écrivant 
ptr(MonPointeur) au lieu de MonPointeur. Vous au- 
rez ainsi informé le compilateur que vous considé- 
rez, dans cette instruction, le pointeur monPointeur 
comme un pointeur de type ordinaire ptr. Et tout 
rentrera dans l'ordre. 

Ce changement de type n'est possible que si les em- 
placements en mémoire des données de l'ancien type 
et du nouveau sont de même dimension. 

Ce procédé vous sera extrêmement utile, car de nom- 
breux outils de la Toolbox ont été déclarés dans les 
interfaces, avec des paramètres d'entrée qui sont des 
pointeurs ou des handles de type très particuliers, 
alors que certains autres outils, comme MemoryMegr, 
travaillent le plus souvent avec des pointeurs et des 
handles de type commun. Il est donc souvent néces- 
saire d'avoir recours à des changements de types. 

Le cast est possible en TML Pascal II sur tous les 
types, sauf les ensembles (sets). 


Nous en resterons là pour cette fois. Sachez que le 
plus difficile est désormais derrière vous! 
LA 
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